home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1992-03-01 | 122.2 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1c f4 20 3e 3c | 50 42 61 73 65 24 44 69 |..... ><|PBase$Di|
|00000010| 72 3e 2e 21 52 75 6e 49 | 6d 61 67 65 0d 00 14 05 |r>.!RunI|mage....|
|00000020| f4 0d 00 1e 27 f4 20 21 | 52 75 6e 49 6d 61 67 65 |....'. !|RunImage|
|00000030| 20 66 6f 72 20 21 50 6f | 77 65 72 62 61 73 65 20 | for !Po|werbase |
|00000040| 64 61 74 61 62 61 73 65 | 0d 00 28 1a f4 20 a9 20 |database|..(.. . |
|00000050| 44 2e 4c 2e 20 26 20 53 | 2e 52 2e 20 48 61 73 6c |D.L. & S|.R. Hasl|
|00000060| 61 6d 0d 00 32 05 3a 0d | 00 3c 23 f4 20 48 65 61 |am..2.:.|.<#. Hea|
|00000070| 70 20 4d 61 6e 61 67 65 | 72 20 28 6d 6f 64 75 6c |p Manage|r (modul|
|00000080| 65 20 2b 20 42 41 53 49 | 43 29 0d 00 46 13 f4 20 |e + BASI|C)..F.. |
|00000090| a9 20 53 2e 52 2e 20 48 | 61 73 6c 61 6d 0d 00 50 |. S.R. H|aslam..P|
|000000a0| 05 3a 0d 00 5a 21 f4 20 | 49 6e 74 65 72 66 61 63 |.:..Z!. |Interfac|
|000000b0| 65 20 4d 61 6e 61 67 65 | 72 20 28 76 2e 20 31 2e |e Manage|r (v. 1.|
|000000c0| 32 35 29 0d 00 64 18 f4 | 20 a9 20 53 69 6d 6f 6e |25)..d..| . Simon|
|000000d0| 20 48 75 6e 74 69 6e 67 | 64 6f 6e 0d 00 6e 05 3a | Hunting|don..n.:|
|000000e0| 0d 00 78 21 76 65 72 73 | 69 6f 6e 24 3d 22 34 2e |..x!vers|ion$="4.|
|000000f0| 32 32 20 28 31 39 2d 4a | 61 6e 2d 31 39 39 32 29 |22 (19-J|an-1992)|
|00000100| 22 0d 00 82 05 3a 0d 00 | 8c 0f 6e 65 78 74 66 69 |"....:..|..nextfi|
|00000110| 6c 65 25 3d 30 0d 00 96 | 2b ee 20 85 20 c8 99 20 |le%=0...|+. . .. |
|00000120| 22 4f 53 5f 43 4c 49 22 | 2c 22 46 58 20 33 22 3a |"OS_CLI"|,"FX 3":|
|00000130| e7 20 a4 77 69 6d 70 65 | 72 72 6f 72 20 8c 20 e0 |. .wimpe|rror . .|
|00000140| 0d 00 a0 0e 70 72 65 73 | 65 6e 74 25 3d a3 0d 00 |....pres|ent%=...|
|00000150| aa 0a f2 73 65 74 75 70 | 0d 00 b4 2e e7 20 62 75 |...setup|..... bu|
|00000160| 66 66 25 3e 65 6e 64 62 | 75 66 66 25 20 8c 20 85 |ff%>endb|uff% . .|
|00000170| 20 30 2c 22 4e 6f 20 72 | 6f 6f 6d 20 66 6f 72 20 | 0,"No r|oom for |
|00000180| 64 65 66 73 2e 22 0d 00 | be 32 e7 20 6d 65 6e 75 |defs."..|.2. menu|
|00000190| 5f 70 74 72 25 3e 6d 65 | 6e 5f 65 6e 64 25 20 8c |_ptr%>me|n_end% .|
|000001a0| 20 85 20 30 2c 22 4e 6f | 20 72 6f 6f 6d 20 66 6f | . 0,"No| room fo|
|000001b0| 72 20 6d 65 6e 75 73 22 | 0d 00 c8 2b ee 20 85 20 |r menus"|...+. . |
|000001c0| c8 99 20 22 4f 53 5f 43 | 4c 49 22 2c 22 46 58 20 |.. "OS_C|LI","FX |
|000001d0| 33 22 3a e7 20 a4 77 69 | 6d 70 65 72 72 6f 72 20 |3":. .wi|mperror |
|000001e0| 8c 20 e0 0d 00 d2 1f c8 | 99 20 22 4f 53 5f 47 65 |. ......|. "OS_Ge|
|000001f0| 74 45 6e 76 22 20 b8 20 | 43 6f 6d 53 74 72 69 6e |tEnv" . |ComStrin|
|00000200| 67 24 0d 00 dc 20 e7 20 | a7 43 6f 6d 53 74 72 69 |g$... . |.ComStri|
|00000210| 6e 67 24 2c 22 2d 64 61 | 74 61 62 61 73 65 22 29 |ng$,"-da|tabase")|
|00000220| 20 8c 0d 00 e6 32 46 69 | 6c 65 24 3d c1 43 6f 6d | ....2Fi|le$=.Com|
|00000230| 53 74 72 69 6e 67 24 2c | a7 43 6f 6d 53 74 72 69 |String$,|.ComStri|
|00000240| 6e 67 24 2c 22 2d 64 61 | 74 61 62 61 73 65 22 29 |ng$,"-da|tabase")|
|00000250| 2b 31 30 29 0d 00 f0 33 | c8 99 20 22 4f 53 5f 47 |+10)...3|.. "OS_G|
|00000260| 53 54 72 61 6e 73 22 2c | 46 69 6c 65 24 2c c4 32 |STrans",|File$,.2|
|00000270| 35 35 2c bd 31 33 29 2c | 32 35 35 20 b8 20 2c 46 |55,.13),|255 . ,F|
|00000280| 69 6c 65 24 2c 4c 25 0d | 00 fa 14 46 69 6c 65 24 |ile$,L%.|...File$|
|00000290| 3d c0 46 69 6c 65 24 2c | 4c 25 29 0d 01 04 15 f2 |=.File$,|L%).....|
|000002a0| 67 65 74 5f 69 74 5f 69 | 6e 28 46 69 6c 65 24 29 |get_it_i|n(File$)|
|000002b0| 0d 01 0e 05 cd 0d 01 18 | 05 f5 0d 01 22 09 f2 70 |........|...."..p|
|000002c0| 6f 6c 6c 0d 01 2c 0b fd | 20 71 75 69 74 25 0d 01 |oll..,..| quit%..|
|000002d0| 36 0f f2 63 6c 6f 73 65 | 5f 64 6f 77 6e 0d 01 40 |6..close|_down..@|
|000002e0| 05 e0 0d 01 4a 05 3a 0d | 01 54 05 3a 0d 01 5e 05 |....J.:.|.T.:..^.|
|000002f0| 3a 0d 01 68 0b dd 20 f2 | 70 6f 6c 6c 0d 01 72 29 |:..h.. .|poll..r)|
|00000300| c8 99 20 22 57 69 6d 70 | 5f 50 6f 6c 6c 22 2c 6d |.. "Wimp|_Poll",m|
|00000310| 61 73 6b 25 2c 62 6c 6f | 63 6b 25 20 b8 20 72 65 |ask%,blo|ck% . re|
|00000320| 61 73 6f 6e 25 0d 01 7c | 2a c8 99 20 22 57 69 6d |ason%..||*.. "Wim|
|00000330| 70 5f 50 6f 6c 6c 50 6f | 69 6e 74 65 72 22 2c 72 |p_PollPo|inter",r|
|00000340| 65 61 73 6f 6e 25 2c 2c | 6d 79 74 61 73 6b 25 0d |eason%,,|mytask%.|
|00000350| 01 86 10 c8 8e 20 72 65 | 61 73 6f 6e 25 20 ca 0d |..... re|ason% ..|
|00000360| 01 90 13 c9 20 30 3a f2 | 63 68 65 63 6b 5f 6a 6f |.... 0:.|check_jo|
|00000370| 62 73 0d 01 9a 18 c9 20 | 31 3a f2 72 65 64 72 61 |bs..... |1:.redra|
|00000380| 77 28 21 62 6c 6f 63 6b | 25 29 0d 01 a4 24 c9 20 |w(!block|%)...$. |
|00000390| 32 3a c8 99 20 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |2:.. "Wi|mp_OpenW|
|000003a0| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 01 |indow",,|block%..|
|000003b0| ae 16 c9 20 33 3a f2 70 | 65 72 66 6f 72 6d 5f 63 |... 3:.p|erform_c|
|000003c0| 6c 6f 73 65 0d 01 b8 1d | c9 20 34 3a f2 68 6f 75 |lose....|. 4:.hou|
|000003d0| 72 67 6c 61 73 73 28 21 | 62 6c 6f 63 6b 25 2c a3 |rglass(!|block%,.|
|000003e0| 29 0d 01 c2 1d c9 20 35 | 3a f2 68 6f 75 72 67 6c |)..... 5|:.hourgl|
|000003f0| 61 73 73 28 21 62 6c 6f | 63 6b 25 2c b9 29 0d 01 |ass(!blo|ck%,.)..|
|00000400| cc 10 c9 20 36 3a f2 62 | 75 74 74 6f 6e 73 0d 01 |... 6:.b|uttons..|
|00000410| d6 1e c9 20 37 3a f2 65 | 6e 64 5f 64 72 61 67 28 |... 7:.e|nd_drag(|
|00000420| 53 74 61 72 74 25 2c 45 | 6e 64 25 29 0d 01 e0 14 |Start%,E|nd%)....|
|00000430| c9 20 38 3a f2 70 72 6f | 63 65 73 73 5f 6b 65 79 |. 8:.pro|cess_key|
|00000440| 0d 01 ea 14 c9 20 39 3a | f2 6d 65 6e 75 5f 73 65 |..... 9:|.menu_se|
|00000450| 6c 65 63 74 0d 01 f4 14 | c9 20 31 37 2c 31 38 3a |lect....|. 17,18:|
|00000460| f2 6d 65 73 73 61 67 65 | 0d 01 fe 43 c9 20 31 39 |.message|...C. 19|
|00000470| 3a f2 73 6f 66 74 65 72 | 72 6f 72 28 33 39 29 3a |:.softer|ror(39):|
|00000480| e7 20 62 6c 6f 63 6b 25 | 21 38 3d 6d 79 72 65 66 |. block%|!8=myref|
|00000490| 25 20 8c 20 c8 99 20 22 | 4f 53 5f 46 69 6c 65 22 |% . .. "|OS_File"|
|000004a0| 2c 36 2c 62 6c 6f 63 6b | 2b 34 34 0d 02 08 05 cb |,6,block|+44.....|
|000004b0| 0d 02 12 05 e1 0d 02 1c | 05 3a 0d 02 26 05 3a 0d |........|.:..&.:.|
|000004c0| 02 30 05 3a 0d 02 3a 11 | dd 20 f2 63 68 65 63 6b |.0.:..:.|. .check|
|000004d0| 5f 6a 6f 62 73 0d 02 44 | 36 e7 20 70 72 69 6e 74 |_jobs..D|6. print|
|000004e0| 69 6e 67 25 20 8c 20 f2 | 70 72 69 6e 74 5f 61 5f |ing% . .|print_a_|
|000004f0| 6c 69 6e 65 28 74 72 65 | 65 61 64 64 72 65 73 73 |line(tre|eaddress|
|00000500| 25 2c 6c 69 73 74 6b 65 | 79 25 29 0d 02 4e 3f e7 |%,listke|y%)..N?.|
|00000510| 20 69 6e 64 65 78 69 6e | 67 25 20 8c 20 f2 69 6e | indexin|g% . .in|
|00000520| 73 65 72 74 5f 69 6e 5f | 69 6e 64 65 78 28 74 72 |sert_in_|index(tr|
|00000530| 65 65 70 6f 73 25 2c 74 | 72 65 65 74 6f 70 25 2c |eepos%,t|reetop%,|
|00000540| 69 6e 64 65 78 6b 65 79 | 25 29 0d 02 58 36 e7 20 |indexkey|%)..X6. |
|00000550| 61 75 74 6f 73 61 76 65 | 25 20 80 20 41 63 63 65 |autosave|% . Acce|
|00000560| 73 73 25 20 8c 20 f2 63 | 68 65 63 6b 5f 73 61 76 |ss% . .c|heck_sav|
|00000570| 65 28 73 61 76 65 69 6e | 74 25 2a 36 30 30 30 29 |e(savein|t%*6000)|
|00000580| 0d 02 62 05 e1 0d 02 6c | 05 3a 0d 02 76 05 3a 0d |..b....l|.:..v.:.|
|00000590| 02 80 05 3a 0d 02 8a 19 | dd 20 f2 68 6f 75 72 67 |...:....|. .hourg|
|000005a0| 6c 61 73 73 28 77 69 25 | 2c 6f 6e 25 29 0d 02 94 |lass(wi%|,on%)...|
|000005b0| 3b e7 20 28 69 6e 64 65 | 78 69 6e 67 25 20 80 20 |;. (inde|xing% . |
|000005c0| 77 69 25 3d 6b 65 79 57 | 25 29 20 84 20 28 70 72 |wi%=keyW|%) . (pr|
|000005d0| 69 6e 74 69 6e 67 25 20 | 80 20 77 69 25 3d 6d 61 |inting% |. wi%=ma|
|000005e0| 74 63 68 57 25 29 20 8c | 0d 02 9e 37 e7 20 6f 6e |tchW%) .|...7. on|
|000005f0| 25 20 8c 20 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 |% . .. "|Hourglas|
|00000600| 73 5f 53 74 61 72 74 22 | 2c 31 20 8b 20 c8 99 20 |s_Start"|,1 . .. |
|00000610| 22 48 6f 75 72 67 6c 61 | 73 73 5f 4f 66 66 22 0d |"Hourgla|ss_Off".|
|00000620| 02 a8 05 cd 0d 02 b2 05 | e1 0d 02 bc 05 3a 0d 02 |........|.....:..|
|00000630| c6 05 3a 0d 02 d0 4b f4 | 20 53 68 75 74 64 6f 77 |..:...K.| Shutdow|
|00000640| 6e 20 72 6f 75 74 69 6e | 65 73 20 2d 2d 2d 2d 2d |n routin|es -----|
|00000650| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000660| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000670| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 02 |--------|------..|
|00000680| da 05 3a 0d 02 e4 11 dd | 20 f2 63 6c 6f 73 65 5f |..:.....| .close_|
|00000690| 64 6f 77 6e 0d 02 ee 08 | ea 20 46 25 0d 02 f8 07 |down....|. F%....|
|000006a0| ea 20 85 0d 03 02 50 ee | 20 85 20 ea 20 24 62 6c |. ....P.| . . $bl|
|000006b0| 6f 63 6b 25 3d 22 54 41 | 53 4b 22 3a c8 99 20 22 |ock%="TA|SK":.. "|
|000006c0| 57 69 6d 70 5f 43 6c 6f | 73 65 44 6f 77 6e 22 2c |Wimp_Clo|seDown",|
|000006d0| 6d 79 74 61 73 6b 25 2c | 21 62 6c 6f 63 6b 25 3a |mytask%,|!block%:|
|000006e0| eb 20 31 32 3a f6 3a f1 | 20 22 20 40 20 23 22 3b |. 12:.:.| " @ #";|
|000006f0| 9e 3a e0 0d 03 0c 12 c8 | 99 20 22 4f 53 5f 42 79 |.:......|. "OS_By|
|00000700| 74 65 22 2c 33 0d 03 16 | 18 c8 99 20 22 48 6f 75 |te",3...|... "Hou|
|00000710| 72 67 6c 61 73 73 5f 53 | 6d 61 73 68 22 0d 03 20 |rglass_S|mash".. |
|00000720| 09 f2 65 78 69 74 0d 03 | 2a 26 c8 99 20 22 57 69 |..exit..|*&.. "Wi|
|00000730| 6d 70 5f 52 65 6c 65 61 | 73 65 49 6e 74 65 72 66 |mp_Relea|seInterf|
|00000740| 61 63 65 22 2c 6d 79 74 | 61 73 6b 25 0d 03 34 08 |ace",myt|ask%..4.|
|00000750| f2 65 6e 64 0d 03 3e 05 | e1 0d 03 48 05 3a 0d 03 |.end..>.|...H.:..|
|00000760| 52 0b dd 20 f2 65 78 69 | 74 0d 03 5c 12 c8 99 20 |R.. .exi|t..\... |
|00000770| 22 4f 53 5f 42 79 74 65 | 22 2c 33 0d 03 66 18 c8 |"OS_Byte|",3..f..|
|00000780| 99 20 22 48 6f 75 72 67 | 6c 61 73 73 5f 53 6d 61 |. "Hourg|lass_Sma|
|00000790| 73 68 22 0d 03 70 7a e7 | 20 77 61 72 6e 25 20 80 |sh"..pz.| warn% .|
|000007a0| 20 72 61 6d 25 20 8c 20 | e7 20 ac 20 a4 63 6f 6e | ram% . |. . .con|
|000007b0| 66 69 72 6d 28 22 43 6c | 6f 73 69 6e 67 20 64 6f |firm("Cl|osing do|
|000007c0| 77 6e 20 22 2b 24 64 61 | 74 61 62 61 73 65 25 2b |wn "+$da|tabase%+|
|000007d0| 22 20 6f 6e 20 52 41 4d | 20 64 69 73 63 2e 20 43 |" on RAM| disc. C|
|000007e0| 68 61 6e 67 65 73 20 6e | 6f 74 20 63 6f 70 69 65 |hanges n|ot copie|
|000007f0| 64 20 74 6f 20 70 65 72 | 6d 61 6e 65 6e 74 20 73 |d to per|manent s|
|00000800| 74 6f 72 61 67 65 2e 22 | 29 20 8c 20 e1 0d 03 7a |torage."|) . ...z|
|00000810| 12 e7 20 70 72 65 73 65 | 6e 74 25 3d 37 20 8c 0d |.. prese|nt%=7 ..|
|00000820| 03 84 11 f2 63 68 65 63 | 6b 5f 63 68 61 6e 67 65 |....chec|k_change|
|00000830| 0d 03 8e 1c 6c 6b 3d ae | 28 22 3c 44 62 61 73 65 |....lk=.|("<Dbase|
|00000840| 24 44 69 72 3e 2e 4c 69 | 6e 6b 22 29 0d 03 98 14 |$Dir>.Li|nk")....|
|00000850| e3 20 46 25 3d 31 20 b8 | 20 66 69 65 6c 64 73 25 |. F%=1 .| fields%|
|00000860| 0d 03 a2 12 f1 23 6c 6b | 2c 6c 69 6e 6b 24 28 46 |.....#lk|,link$(F|
|00000870| 25 29 0d 03 ac 08 ed 20 | 46 25 0d 03 b6 05 cd 0d |%)..... |F%......|
|00000880| 03 c0 13 f2 63 6c 6f 73 | 65 5f 66 69 6c 65 28 6c |....clos|e_file(l|
|00000890| 6b 29 0d 03 ca 0e 6c 69 | 6e 6b 24 28 29 3d 22 22 |k)....li|nk$()=""|
|000008a0| 0d 03 d4 10 f2 63 6c 6f | 73 65 5f 66 69 6c 65 73 |.....clo|se_files|
|000008b0| 0d 03 de 29 e7 20 41 63 | 63 65 73 73 25 3d b9 20 |...). Ac|cess%=. |
|000008c0| 80 20 70 72 65 73 65 6e | 74 25 3d 37 20 8c 20 f2 |. presen|t%=7 . .|
|000008d0| 73 61 76 65 5f 6b 65 79 | 73 0d 03 e8 11 f2 68 69 |save_key|s.....hi|
|000008e0| 64 65 5f 77 69 6e 64 6f | 77 73 0d 03 f2 1b f2 64 |de_windo|ws.....d|
|000008f0| 65 6c 65 74 65 5f 69 63 | 6f 6e 73 28 6d 61 69 6e |elete_ic|ons(main|
|00000900| 57 25 2c 30 29 0d 03 fc | 1e f2 64 65 6c 65 74 65 |W%,0)...|..delete|
|00000910| 5f 69 63 6f 6e 73 28 64 | 61 74 61 64 69 63 57 25 |_icons(d|atadicW%|
|00000920| 2c 30 29 0d 04 06 1e f2 | 64 65 6c 65 74 65 5f 69 |,0).....|delete_i|
|00000930| 63 6f 6e 73 28 70 73 65 | 6c 65 63 74 57 25 2c 31 |cons(pse|lectW%,1|
|00000940| 29 0d 04 10 13 f2 72 65 | 63 6f 76 65 72 5f 6d 65 |).....re|cover_me|
|00000950| 6d 6f 72 79 0d 04 1a 0e | f2 69 6e 69 74 5f 76 61 |mory....|.init_va|
|00000960| 72 73 0d 04 24 15 e3 20 | 49 25 3d 30 20 b8 20 4d |rs..$.. |I%=0 . M|
|00000970| 61 78 54 61 62 73 25 0d | 04 2e 2a 70 6f 73 25 3d |axTabs%.|..*pos%=|
|00000980| 6d 65 6e 75 25 28 35 29 | 2b 32 38 2b 49 25 2a 32 |menu%(5)|+28+I%*2|
|00000990| 34 2b 31 32 3a 24 70 6f | 73 25 3d 22 4e 6f 6e 65 |4+12:$po|s%="None|
|000009a0| 22 0d 04 38 17 f2 6c 69 | 74 28 6d 65 6e 75 25 28 |"..8..li|t(menu%(|
|000009b0| 35 29 2c 49 25 2c a3 29 | 0d 04 42 14 70 72 69 6e |5),I%,.)|..B.prin|
|000009c0| 74 72 65 6c 24 28 49 25 | 29 3d 22 22 0d 04 4c 08 |trel$(I%|)=""..L.|
|000009d0| ed 20 49 25 0d 04 56 11 | 24 50 61 73 73 77 6f 72 |. I%..V.|$Passwor|
|000009e0| 64 25 3d 22 22 0d 04 60 | 0e 70 72 65 73 65 6e 74 |d%=""..`|.present|
|000009f0| 25 3d a3 0d 04 6a 0b 65 | 78 69 74 25 3d b9 0d 04 |%=...j.e|xit%=...|
|00000a00| 74 16 f2 6c 69 74 28 6d | 65 6e 75 25 28 30 29 2c |t..lit(m|enu%(0),|
|00000a10| 31 2c b9 29 0d 04 7e 16 | f2 6c 69 74 28 6d 65 6e |1,.)..~.|.lit(men|
|00000a20| 75 25 28 30 29 2c 32 2c | a3 29 0d 04 88 16 f2 6c |u%(0),2,|.).....l|
|00000a30| 69 74 28 6d 65 6e 75 25 | 28 30 29 2c 33 2c a3 29 |it(menu%|(0),3,.)|
|00000a40| 0d 04 92 16 f2 6c 69 74 | 28 6d 65 6e 75 25 28 36 |.....lit|(menu%(6|
|00000a50| 29 2c 36 2c a3 29 0d 04 | 9c 16 f2 6c 69 74 28 6d |),6,.)..|...lit(m|
|00000a60| 65 6e 75 25 28 36 29 2c | 37 2c a3 29 0d 04 a6 16 |enu%(6),|7,.)....|
|00000a70| f2 6c 69 74 28 6d 65 6e | 75 25 28 36 29 2c 38 2c |.lit(men|u%(6),8,|
|00000a80| a3 29 0d 04 b0 10 f2 73 | 65 74 5f 61 75 74 6f 28 |.).....s|et_auto(|
|00000a90| a3 29 0d 04 ba 1c f2 74 | 69 63 6b 5f 6f 6e 65 28 |.).....t|ick_one(|
|00000aa0| 6d 65 6e 75 25 28 31 35 | 29 2c 34 2c 30 29 0d 04 |menu%(15|),4,0)..|
|00000ab0| c4 17 f2 74 69 63 6b 28 | 6d 65 6e 75 25 28 37 29 |...tick(|menu%(7)|
|00000ac0| 2c 35 2c b9 29 0d 04 ce | 17 f2 74 69 63 6b 28 6d |,5,.)...|..tick(m|
|00000ad0| 65 6e 75 25 28 32 29 2c | 33 2c b9 29 0d 04 d8 17 |enu%(2),|3,.)....|
|00000ae0| f2 74 69 63 6b 28 6d 65 | 6e 75 25 28 32 29 2c 34 |.tick(me|nu%(2),4|
|00000af0| 2c a3 29 0d 04 e2 05 e1 | 0d 04 ec 05 3a 0d 04 f6 |,.).....|....:...|
|00000b00| 1c dd 20 f2 64 65 6c 65 | 74 65 5f 69 63 6f 6e 73 |.. .dele|te_icons|
|00000b10| 28 77 69 25 2c 69 63 25 | 29 0d 05 00 1c 21 62 6c |(wi%,ic%|)....!bl|
|00000b20| 6f 63 6b 25 3d 77 69 25 | 3a 62 6c 6f 63 6b 25 21 |ock%=wi%|:block%!|
|00000b30| 34 3d 69 63 25 0d 05 0a | 05 f5 0d 05 14 20 c8 99 |4=ic%...|..... ..|
|00000b40| 20 22 57 69 6d 70 5f 44 | 65 6c 65 74 65 49 63 6f | "Wimp_D|eleteIco|
|00000b50| 6e 22 2c 2c 62 6c 6f 63 | 6b 25 0d 05 1e 17 69 63 |n",,bloc|k%....ic|
|00000b60| 25 2b 3d 31 3a 62 6c 6f | 63 6b 25 21 34 3d 69 63 |%+=1:blo|ck%!4=ic|
|00000b70| 25 0d 05 28 22 c8 99 20 | 22 57 69 6d 70 5f 47 65 |%..(".. |"Wimp_Ge|
|00000b80| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 62 6c 6f |tIconSta|te",,blo|
|00000b90| 63 6b 25 0d 05 32 1f fd | 20 28 28 62 6c 6f 63 6b |ck%..2..| ((block|
|00000ba0| 25 21 32 34 29 20 80 20 | 28 31 3c 3c 32 33 29 29 |%!24) . |(1<<23))|
|00000bb0| 3e 30 0d 05 3c 05 e1 0d | 05 46 05 3a 0d 05 50 12 |>0..<...|.F.:..P.|
|00000bc0| dd 20 f2 63 6c 6f 73 65 | 5f 66 69 6c 65 73 0d 05 |. .close|_files..|
|00000bd0| 5a 0a ea 20 6b 65 79 25 | 0d 05 64 14 e3 20 6b 65 |Z.. key%|..d.. ke|
|00000be0| 79 25 3d 30 20 b8 20 4b | 65 79 73 25 0d 05 6e 0f |y%=0 . K|eys%..n.|
|00000bf0| f2 64 61 74 65 28 6b 65 | 79 25 29 0d 05 78 0a ed |.date(ke|y%)..x..|
|00000c00| 20 6b 65 79 25 0d 05 82 | 14 f2 63 6c 6f 73 65 5f | key%...|..close_|
|00000c10| 66 69 6c 65 28 63 68 64 | 29 0d 05 8c 13 f2 63 6c |file(chd|).....cl|
|00000c20| 6f 73 65 5f 66 69 6c 65 | 28 6c 6b 29 0d 05 96 12 |ose_file|(lk)....|
|00000c30| f2 63 6c 6f 73 65 5f 66 | 69 6c 65 28 46 29 0d 05 |.close_f|ile(F)..|
|00000c40| a0 12 f2 63 6c 6f 73 65 | 5f 66 69 6c 65 28 56 29 |...close|_file(V)|
|00000c50| 0d 05 aa 05 e1 0d 05 b4 | 05 3a 0d 05 be 1c dd 20 |........|.:..... |
|00000c60| f2 63 6c 6f 73 65 5f 66 | 69 6c 65 28 f8 20 68 61 |.close_f|ile(. ha|
|00000c70| 6e 64 6c 65 25 29 0d 05 | c8 11 e7 20 68 61 6e 64 |ndle%)..|... hand|
|00000c80| 6c 65 25 3e 30 20 8c 0d | 05 d2 0d d9 23 68 61 6e |le%>0 ..|....#han|
|00000c90| 64 6c 65 25 0d 05 dc 0d | 68 61 6e 64 6c 65 25 3d |dle%....|handle%=|
|00000ca0| 30 0d 05 e6 05 cd 0d 05 | f0 05 e1 0d 05 fa 05 3a |0.......|.......:|
|00000cb0| 0d 06 04 15 dd 20 f2 72 | 65 63 6f 76 65 72 5f 6d |..... .r|ecover_m|
|00000cc0| 65 6d 6f 72 79 0d 06 0e | 08 ea 20 49 25 0d 06 18 |emory...|.. I%...|
|00000cd0| 1c f2 73 63 72 61 70 62 | 6c 6f 63 6b 28 74 65 78 |..scrapb|lock(tex|
|00000ce0| 74 61 6e 63 68 6f 72 25 | 29 0d 06 22 1b f2 73 63 |tanchor%|).."..sc|
|00000cf0| 72 61 70 62 6c 6f 63 6b | 28 63 73 76 61 6e 63 68 |rapblock|(csvanch|
|00000d00| 6f 72 25 29 0d 06 2c 2b | f2 73 63 72 61 70 62 6c |or%)..,+|.scrapbl|
|00000d10| 6f 63 6b 28 66 6f 72 6d | 61 6e 63 68 6f 72 25 29 |ock(form|anchor%)|
|00000d20| 3a 21 66 6f 72 6d 61 6e | 63 68 6f 72 25 3d 30 0d |:!forman|chor%=0.|
|00000d30| 06 36 29 f2 73 63 72 61 | 70 62 6c 6f 63 6b 28 73 |.6).scra|pblock(s|
|00000d40| 65 6c 61 6e 63 68 6f 72 | 25 29 3a 21 73 65 6c 61 |elanchor|%):!sela|
|00000d50| 6e 63 68 6f 72 25 3d 30 | 0d 06 40 2b f2 73 63 72 |nchor%=0|..@+.scr|
|00000d60| 61 70 62 6c 6f 63 6b 28 | 6d 61 72 6b 61 6e 63 68 |apblock(|markanch|
|00000d70| 6f 72 25 29 3a 21 6d 61 | 72 6b 61 6e 63 68 6f 72 |or%):!ma|rkanchor|
|00000d80| 25 3d 30 0d 06 4a 15 e3 | 20 49 25 3d 30 20 b8 20 |%=0..J..| I%=0 . |
|00000d90| 4d 61 78 54 61 62 73 25 | 0d 06 54 31 f2 73 63 72 |MaxTabs%|..T1.scr|
|00000da0| 61 70 62 6c 6f 63 6b 28 | 74 61 62 61 6e 63 68 6f |apblock(|tabancho|
|00000db0| 72 25 28 49 25 29 29 3a | 21 74 61 62 61 6e 63 68 |r%(I%)):|!tabanch|
|00000dc0| 6f 72 25 28 49 25 29 3d | 30 0d 06 5e 08 ed 20 49 |or%(I%)=|0..^.. I|
|00000dd0| 25 0d 06 68 17 e3 20 49 | 25 3d 30 20 b8 20 4d 61 |%..h.. I|%=0 . Ma|
|00000de0| 78 4b 65 79 73 25 2b 31 | 0d 06 72 31 f2 73 63 72 |xKeys%+1|..r1.scr|
|00000df0| 61 70 62 6c 6f 63 6b 28 | 6b 65 79 61 6e 63 68 6f |apblock(|keyancho|
|00000e00| 72 25 28 49 25 29 29 3a | 21 6b 65 79 61 6e 63 68 |r%(I%)):|!keyanch|
|00000e10| 6f 72 25 28 49 25 29 3d | 30 0d 06 7c 08 ed 20 49 |or%(I%)=|0..|.. I|
|00000e20| 25 0d 06 86 05 e1 0d 06 | 90 05 3a 0d 06 9a 0a dd |%.......|..:.....|
|00000e30| 20 f2 65 6e 64 0d 06 a4 | 12 24 62 6c 6f 63 6b 25 | .end...|.$block%|
|00000e40| 3d 22 54 41 53 4b 22 0d | 06 ae 27 c8 99 20 22 57 |="TASK".|..'.. "W|
|00000e50| 69 6d 70 5f 43 6c 6f 73 | 65 44 6f 77 6e 22 2c 6d |imp_Clos|eDown",m|
|00000e60| 79 74 61 73 6b 25 2c 21 | 62 6c 6f 63 6b 25 0d 06 |ytask%,!|block%..|
|00000e70| b8 05 e0 0d 06 c2 05 e1 | 0d 06 cc 05 3a 0d 06 d6 |........|....:...|
|00000e80| 05 3a 0d 06 e0 4b f4 20 | 45 72 72 6f 72 20 68 61 |.:...K. |Error ha|
|00000e90| 6e 64 6c 69 6e 67 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ndling -|--------|
|00000ea0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000eb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ec0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 06 ea |--------|-----...|
|00000ed0| 05 3a 0d 06 f4 0c dd 20 | f2 65 72 72 6f 72 0d 06 |.:..... |.error..|
|00000ee0| fe 12 c8 99 20 22 4f 53 | 5f 42 79 74 65 22 2c 33 |.... "OS|_Byte",3|
|00000ef0| 0d 07 08 09 ee 20 85 20 | 87 0d 07 12 17 c8 99 20 |..... . |....... |
|00000f00| 22 57 69 6d 70 5f 43 6c | 6f 73 65 44 6f 77 6e 22 |"Wimp_Cl|oseDown"|
|00000f10| 0d 07 1c 16 f1 20 f6 24 | 3b 22 20 61 74 20 6c 69 |..... .$|;" at li|
|00000f20| 6e 65 20 22 3b 9e 0d 07 | 26 05 e0 0d 07 30 05 e1 |ne ";...|&....0..|
|00000f30| 0d 07 3a 05 3a 0d 07 44 | 10 dd 20 a4 77 69 6d 70 |..:.:..D|.. .wimp|
|00000f40| 65 72 72 6f 72 0d 07 4e | 12 c8 99 20 22 4f 53 5f |error..N|... "OS_|
|00000f50| 42 79 74 65 22 2c 33 0d | 07 58 0d 21 62 6c 6f 63 |Byte",3.|.X.!bloc|
|00000f60| 6b 25 3d 9f 0d 07 62 24 | 24 28 62 6c 6f 63 6b 25 |k%=...b$|$(block%|
|00000f70| 2b 34 29 3d f6 24 2b 22 | 20 61 74 20 6c 69 6e 65 |+4)=.$+"| at line|
|00000f80| 20 22 2b c3 9e 2b bd 30 | 0d 07 6c 3b c8 99 20 22 | "+..+.0|..l;.. "|
|00000f90| 57 69 6d 70 5f 52 65 70 | 6f 72 74 45 72 72 6f 72 |Wimp_Rep|ortError|
|00000fa0| 22 2c 62 6c 6f 63 6b 25 | 2c 33 2c 22 50 6f 77 65 |",block%|,3,"Powe|
|00000fb0| 72 62 61 73 65 22 20 b8 | 20 2c 72 65 73 70 6f 6e |rbase" .| ,respon|
|00000fc0| 73 65 25 0d 07 76 27 e7 | 20 72 65 73 70 6f 6e 73 |se%..v'.| respons|
|00000fd0| 65 25 3d 32 20 8c 20 f2 | 63 6c 6f 73 65 5f 64 6f |e%=2 . .|close_do|
|00000fe0| 77 6e 3a 3d b9 20 8b 20 | 3d a3 0d 07 80 05 3a 0d |wn:=. . |=.....:.|
|00000ff0| 07 8a 14 dd 20 f2 73 6f | 66 74 65 72 72 6f 72 28 |.... .so|fterror(|
|00001000| 45 25 29 0d 07 94 12 c8 | 99 20 22 4f 53 5f 42 79 |E%).....|. "OS_By|
|00001010| 74 65 22 2c 33 0d 07 9e | 1d 65 72 72 6f 72 62 6c |te",3...|.errorbl|
|00001020| 6f 63 6b 25 3d 21 65 72 | 72 6f 72 61 6e 63 68 6f |ock%=!er|rorancho|
|00001030| 72 25 0d 07 a8 0b c8 95 | 20 45 25 3e 31 0d 07 b2 |r%......| E%>1...|
|00001040| 28 65 72 72 6f 72 62 6c | 6f 63 6b 25 2b 3d a9 a4 |(errorbl|ock%+=..|
|00001050| 67 65 74 73 74 72 28 65 | 72 72 6f 72 62 6c 6f 63 |getstr(e|rrorbloc|
|00001060| 6b 25 29 2b 31 0d 07 bc | 09 45 25 2d 3d 31 0d 07 |k%)+1...|.E%-=1..|
|00001070| c6 05 ce 0d 07 d0 24 24 | 28 62 6c 6f 63 6b 25 2b |......$$|(block%+|
|00001080| 34 29 3d a4 67 65 74 73 | 74 72 28 65 72 72 6f 72 |4)=.gets|tr(error|
|00001090| 62 6c 6f 63 6b 25 29 0d | 07 da 0f 21 62 6c 6f 63 |block%).|...!bloc|
|000010a0| 6b 25 3d 32 35 35 0d 07 | e4 30 c8 99 20 22 57 69 |k%=255..|.0.. "Wi|
|000010b0| 6d 70 5f 52 65 70 6f 72 | 74 45 72 72 6f 72 22 2c |mp_Repor|tError",|
|000010c0| 62 6c 6f 63 6b 25 2c 26 | 31 31 2c 22 50 6f 77 65 |block%,&|11,"Powe|
|000010d0| 72 62 61 73 65 22 0d 07 | ee 05 e1 0d 07 f8 05 3a |rbase"..|.......:|
|000010e0| 0d 08 02 05 3a 0d 08 0c | 4b f4 20 50 72 6f 67 72 |....:...|K. Progr|
|000010f0| 61 6d 20 69 6e 69 74 69 | 61 6c 69 73 61 74 69 6f |am initi|alisatio|
|00001100| 6e 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |n ------|--------|
|00001110| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001120| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001130| 0d 08 16 05 3a 0d 08 20 | 0c dd 20 f2 73 65 74 75 |....:.. |.. .setu|
|00001140| 70 0d 08 2a 18 ea 20 41 | 25 2c 49 25 2c 4a 25 2c |p..*.. A|%,I%,J%,|
|00001150| 56 25 2c 76 61 6c 69 64 | 24 0d 08 34 2a 4d 61 78 |V%,valid|$..4*Max|
|00001160| 46 69 65 6c 64 73 25 3d | 31 30 30 3a 4d 61 78 4b |Fields%=|100:MaxK|
|00001170| 65 79 73 25 3d 31 30 3a | 4d 61 78 54 61 62 73 25 |eys%=10:|MaxTabs%|
|00001180| 3d 31 39 0d 08 3e 2d f2 | 64 69 6d 5f 61 72 72 61 |=19..>-.|dim_arra|
|00001190| 79 73 28 4d 61 78 46 69 | 65 6c 64 73 25 2c 4d 61 |ys(MaxFi|elds%,Ma|
|000011a0| 78 4b 65 79 73 25 2c 4d | 61 78 54 61 62 73 25 29 |xKeys%,M|axTabs%)|
|000011b0| 0d 08 48 0e f2 69 6e 69 | 74 5f 76 61 72 73 0d 08 |..H..ini|t_vars..|
|000011c0| 52 45 f4 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |RE. ----|--------|
|000011d0| 2d 2d 2d 2d 2d 2d 20 49 | 6e 69 74 69 61 6c 69 73 |------ I|nitialis|
|000011e0| 65 20 57 69 6d 70 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |e Wimp -|--------|
|000011f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001200| 2d 2d 2d 0d 08 5c 12 24 | 62 6c 6f 63 6b 25 3d 22 |---..\.$|block%="|
|00001210| 54 41 53 4b 22 0d 08 66 | 19 6d 61 73 6b 25 3d 28 |TASK"..f|.mask%=(|
|00001220| 31 3c 3c 31 31 29 2b 28 | 31 3c 3c 31 32 29 0d 08 |1<<11)+(|1<<12)..|
|00001230| 70 43 c8 99 20 22 57 69 | 6d 70 5f 49 6e 69 74 69 |pC.. "Wi|mp_Initi|
|00001240| 61 6c 69 73 65 22 2c 32 | 30 30 2c 21 62 6c 6f 63 |alise",2|00,!bloc|
|00001250| 6b 25 2c 22 50 6f 77 65 | 72 62 61 73 65 22 20 b8 |k%,"Powe|rbase" .|
|00001260| 20 76 65 72 73 69 6f 6e | 25 2c 6d 79 74 61 73 6b | version|%,mytask|
|00001270| 25 0d 08 7a 24 c8 99 20 | 22 57 69 6d 70 5f 43 6c |%..z$.. |"Wimp_Cl|
|00001280| 61 69 6d 49 6e 74 65 72 | 66 61 63 65 22 2c 6d 79 |aimInter|face",my|
|00001290| 74 61 73 6b 25 0d 08 84 | 3d 69 63 6f 6e 25 3d a4 |task%...|=icon%=.|
|000012a0| 63 72 65 61 74 65 5f 69 | 63 6f 6e 28 2d 31 2c 30 |create_i|con(-1,0|
|000012b0| 2c 30 2c 36 38 2c 37 32 | 2c 26 33 30 30 32 2c 22 |,0,68,72|,&3002,"|
|000012c0| 21 50 6f 77 65 72 62 61 | 73 65 22 2c 30 2c 30 2c |!Powerba|se",0,0,|
|000012d0| 30 29 0d 08 8e 44 f4 20 | 2d 2d 2d 2d 2d 2d 2d 2d |0)...D. |--------|
|000012e0| 2d 20 53 65 74 20 75 70 | 20 48 65 61 70 20 4d 61 |- Set up| Heap Ma|
|000012f0| 6e 61 67 65 72 2e 20 4c | 6f 61 64 20 65 72 72 6f |nager. L|oad erro|
|00001300| 72 20 6d 65 73 73 61 67 | 65 73 20 2d 2d 2d 2d 2d |r messag|es -----|
|00001310| 2d 2d 2d 2d 2d 2d 0d 08 | 98 0d f2 69 6e 69 74 68 |------..|...inith|
|00001320| 65 61 70 0d 08 a2 34 c8 | 99 20 22 4f 53 5f 46 69 |eap...4.|. "OS_Fi|
|00001330| 6c 65 22 2c 35 2c 22 3c | 50 42 61 73 65 24 44 69 |le",5,"<|PBase$Di|
|00001340| 72 3e 2e 45 72 72 6f 72 | 4d 73 67 22 20 b8 20 2c |r>.Error|Msg" . ,|
|00001350| 2c 2c 2c 6c 65 6e 25 0d | 08 ac 2b f2 6e 65 77 5f |,,,len%.|..+.new_|
|00001360| 62 6c 6f 63 6b 28 65 72 | 72 6f 72 61 6e 63 68 6f |block(er|rorancho|
|00001370| 72 25 2c 28 6c 65 6e 25 | 2b 33 29 20 80 20 ac 20 |r%,(len%|+3) . . |
|00001380| 33 29 0d 08 b6 39 c8 99 | 20 22 4f 53 5f 46 69 6c |3)...9..| "OS_Fil|
|00001390| 65 22 2c 32 35 35 2c 22 | 3c 50 42 61 73 65 24 44 |e",255,"|<PBase$D|
|000013a0| 69 72 3e 2e 45 72 72 6f | 72 4d 73 67 22 2c 21 65 |ir>.Erro|rMsg",!e|
|000013b0| 72 72 6f 72 61 6e 63 68 | 6f 72 25 0d 08 c0 33 c8 |rroranch|or%...3.|
|000013c0| 99 20 22 4f 53 5f 46 69 | 6c 65 22 2c 35 2c 22 3c |. "OS_Fi|le",5,"<|
|000013d0| 50 42 61 73 65 24 44 69 | 72 3e 2e 53 70 72 69 74 |PBase$Di|r>.Sprit|
|000013e0| 65 73 22 20 b8 20 2c 2c | 2c 2c 6c 65 6e 25 0d 08 |es" . ,,|,,len%..|
|000013f0| ca 21 f2 6e 65 77 5f 62 | 6c 6f 63 6b 28 73 70 72 |.!.new_b|lock(spr|
|00001400| 61 6e 63 68 6f 72 25 2c | 6c 65 6e 25 2b 34 29 0d |anchor%,|len%+4).|
|00001410| 08 d4 18 73 70 72 69 74 | 65 73 25 3d 21 73 70 72 |...sprit|es%=!spr|
|00001420| 61 6e 63 68 6f 72 25 0d | 08 de 14 21 73 70 72 69 |anchor%.|...!spri|
|00001430| 74 65 73 25 3d 6c 65 6e | 25 2b 34 0d 08 e8 35 c8 |tes%=len|%+4...5.|
|00001440| 99 20 22 4f 53 5f 46 69 | 6c 65 22 2c 32 35 35 2c |. "OS_Fi|le",255,|
|00001450| 22 3c 50 42 61 73 65 24 | 44 69 72 3e 2e 53 70 72 |"<PBase$|Dir>.Spr|
|00001460| 69 74 65 73 22 2c 73 70 | 72 69 74 65 73 25 2b 34 |ites",sp|rites%+4|
|00001470| 0d 08 f2 45 f4 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...E. --|--------|
|00001480| 2d 2d 2d 2d 2d 20 52 65 | 61 64 20 76 61 6c 69 64 |----- Re|ad valid|
|00001490| 61 74 69 6f 6e 20 73 74 | 72 69 6e 67 73 20 2d 2d |ation st|rings --|
|000014a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000014b0| 2d 2d 2d 2d 2d 0d 08 fc | 21 56 3d 8e 28 22 3c 50 |-----...|!V=.("<P|
|000014c0| 62 61 73 65 24 44 69 72 | 3e 2e 56 61 6c 53 74 72 |base$Dir|>.ValStr|
|000014d0| 69 6e 67 73 22 29 0d 09 | 06 14 76 73 74 72 69 6e |ings")..|..vstrin|
|000014e0| 67 73 25 3d bb 28 be 23 | 56 29 0d 09 10 3c de 20 |gs%=.(.#|V)...<. |
|000014f0| 76 6e 61 6d 65 24 28 76 | 73 74 72 69 6e 67 73 25 |vname$(v|strings%|
|00001500| 29 2c 76 61 6c 69 64 25 | 28 76 73 74 72 69 6e 67 |),valid%|(vstring|
|00001510| 73 25 29 2c 72 76 61 6c | 69 64 25 28 76 73 74 72 |s%),rval|id%(vstr|
|00001520| 69 6e 67 73 25 29 0d 09 | 1a 16 e3 20 49 25 3d 30 |ings%)..|... I%=0|
|00001530| 20 b8 20 76 73 74 72 69 | 6e 67 73 25 0d 09 24 12 | . vstri|ngs%..$.|
|00001540| 76 6e 61 6d 65 24 28 49 | 25 29 3d be 23 56 0d 09 |vname$(I|%)=.#V..|
|00001550| 2e 0e 76 61 6c 69 64 24 | 3d be 23 56 0d 09 38 2d |..valid$|=.#V..8-|
|00001560| de 20 56 25 20 a9 28 76 | 61 6c 69 64 24 29 2b 31 |. V% .(v|alid$)+1|
|00001570| 3a 24 56 25 3d 76 61 6c | 69 64 24 3a 76 61 6c 69 |:$V%=val|id$:vali|
|00001580| 64 25 28 49 25 29 3d 56 | 25 0d 09 42 2e de 20 56 |d%(I%)=V|%..B.. V|
|00001590| 25 20 a9 28 76 61 6c 69 | 64 24 29 2b 31 3a 24 56 |% .(vali|d$)+1:$V|
|000015a0| 25 3d 76 61 6c 69 64 24 | 3a 72 76 61 6c 69 64 25 |%=valid$|:rvalid%|
|000015b0| 28 49 25 29 3d 56 25 0d | 09 4c 08 ed 20 49 25 0d |(I%)=V%.|.L.. I%.|
|000015c0| 09 56 12 f2 63 6c 6f 73 | 65 5f 66 69 6c 65 28 56 |.V..clos|e_file(V|
|000015d0| 29 0d 09 60 26 de 20 68 | 61 6e 64 25 20 31 36 3a |)..`&. h|and% 16:|
|000015e0| 24 68 61 6e 64 25 3d 22 | 50 70 74 72 5f 68 61 6e |$hand%="|Pptr_han|
|000015f0| 64 2c 31 32 2c 38 22 0d | 09 6a 2a de 20 77 72 69 |d,12,8".|.j*. wri|
|00001600| 74 65 70 25 20 31 36 3a | 24 77 72 69 74 65 70 25 |tep% 16:|$writep%|
|00001610| 3d 22 50 70 74 72 5f 77 | 72 69 74 65 2c 34 2c 34 |="Pptr_w|rite,4,4|
|00001620| 22 0d 09 74 23 de 20 74 | 69 63 6b 25 20 31 32 3a |"..t#. t|ick% 12:|
|00001630| 24 74 69 63 6b 25 3d 22 | 53 6f 70 74 6f 66 66 2c |$tick%="|Soptoff,|
|00001640| 79 65 73 22 0d 09 7e 45 | f4 20 2d 2d 2d 2d 2d 2d |yes"..~E|. ------|
|00001650| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001660| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001670| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001680| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 09 88 2e f2 67 65 |--------|-.....ge|
|00001690| 74 73 63 72 65 65 6e 73 | 69 7a 65 28 53 63 72 65 |tscreens|ize(Scre|
|000016a0| 65 6e 57 69 64 74 68 25 | 2c 53 63 72 65 65 6e 48 |enWidth%|,ScreenH|
|000016b0| 65 69 67 68 74 25 29 0d | 09 92 13 f2 63 72 65 61 |eight%).|....crea|
|000016c0| 74 65 5f 77 69 6e 64 6f | 77 73 0d 09 9c 0f f2 6d |te_windo|ws.....m|
|000016d0| 61 6b 65 5f 6d 65 6e 75 | 73 0d 09 a6 10 f2 73 65 |ake_menu|s.....se|
|000016e0| 74 5f 61 75 74 6f 28 a3 | 29 0d 09 b0 05 e1 0d 09 |t_auto(.|).......|
|000016f0| ba 05 3a 0d 09 c4 1b dd | 20 f2 64 69 6d 5f 61 72 |..:.....| .dim_ar|
|00001700| 72 61 79 73 28 46 25 2c | 4b 25 2c 54 25 29 0d 09 |rays(F%,|K%,T%)..|
|00001710| ce 7a de 20 64 65 73 63 | 25 28 46 25 29 2c 54 61 |.z. desc|%(F%),Ta|
|00001720| 67 24 28 46 25 29 2c 66 | 69 65 6c 64 25 28 46 25 |g$(F%),f|ield%(F%|
|00001730| 29 2c 46 24 28 46 25 29 | 2c 52 66 25 28 46 25 29 |),F$(F%)|,Rf%(F%)|
|00001740| 2c 6c 65 6e 25 28 46 25 | 29 2c 69 6c 65 6e 25 28 |,len%(F%|),ilen%(|
|00001750| 46 25 29 2c 63 68 61 72 | 74 79 70 65 25 28 46 25 |F%),char|type%(F%|
|00001760| 29 2c 66 69 78 25 28 46 | 25 29 2c 6c 69 6e 6b 24 |),fix%(F|%),link$|
|00001770| 28 46 25 29 2c 54 61 62 | 25 28 46 25 29 2c 66 69 |(F%),Tab|%(F%),fi|
|00001780| 65 6c 64 24 28 46 25 29 | 0d 09 d8 4f de 20 44 61 |eld$(F%)|...O. Da|
|00001790| 74 65 25 28 35 29 2c 49 | 6e 64 65 78 24 28 4b 25 |te%(5),I|ndex$(K%|
|000017a0| 2b 31 29 2c 4b 4c 25 28 | 4b 25 2b 31 29 2c 4b 46 |+1),KL%(|K%+1),KF|
|000017b0| 25 28 4b 25 2b 31 2c 31 | 29 2c 4b 57 25 28 4b 25 |%(K%+1,1|),KW%(K%|
|000017c0| 2b 31 2c 33 29 2c 6b 65 | 79 24 28 4b 25 2b 31 29 |+1,3),ke|y$(K%+1)|
|000017d0| 2c 57 44 25 28 33 29 0d | 09 e2 12 de 20 4c 61 62 |,WD%(3).|.... Lab|
|000017e0| 65 6c 24 28 31 30 2c 32 | 29 0d 09 ec 0f de 20 53 |el$(10,2|)..... S|
|000017f0| 75 6d 28 33 30 2c 33 29 | 0d 09 f6 21 de 20 6b 65 |um(30,3)|...!. ke|
|00001800| 79 20 32 35 36 2c 64 61 | 74 65 25 20 36 2c 63 61 |y 256,da|te% 6,ca|
|00001810| 6c 63 72 6f 77 25 20 46 | 25 0d 0a 00 1a de 20 6d |lcrow% F|%..... m|
|00001820| 65 6e 75 25 28 32 30 29 | 2c 63 68 6f 69 63 65 24 |enu%(20)|,choice$|
|00001830| 28 34 29 0d 0a 0a 34 de | 20 74 61 62 6c 65 24 28 |(4)...4.| table$(|
|00001840| 54 25 2b 31 29 2c 74 61 | 62 66 69 65 6c 64 6c 65 |T%+1),ta|bfieldle|
|00001850| 6e 25 28 39 29 2c 66 63 | 6f 6c 25 28 36 29 2c 6e |n%(9),fc|ol%(6),n|
|00001860| 63 6f 6c 25 28 36 29 0d | 0a 14 0d de 20 72 65 6c |col%(6).|.... rel|
|00001870| 25 28 36 29 0d 0a 1e 14 | 4d 43 25 3d 33 30 3a de |%(6)....|MC%=30:.|
|00001880| 20 4c 25 28 4d 43 25 29 | 0d 0a 28 4a f4 20 2d 2d | L%(MC%)|..(J. --|
|00001890| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000018a0| 2d 2d 20 41 6c 6c 6f 63 | 61 74 65 20 62 75 66 66 |-- Alloc|ate buff|
|000018b0| 65 72 73 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ers ----|--------|
|000018c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000018d0| 2d 2d 0d 0a 32 48 de 20 | 62 6c 6f 63 6b 25 20 26 |--..2H. |block% &|
|000018e0| 31 30 30 30 2c 6d 65 6e | 62 6c 6b 25 20 26 43 30 |1000,men|blk% &C0|
|000018f0| 30 2c 62 75 66 66 25 20 | 26 35 30 30 30 2c 73 61 |0,buff% |&5000,sa|
|00001900| 76 65 62 75 66 66 25 20 | 26 31 30 30 2c 63 68 6f |vebuff% |&100,cho|
|00001910| 69 63 65 73 25 20 26 31 | 30 30 0d 0a 3c 40 6d 65 |ices% &1|00..<@me|
|00001920| 6e 5f 65 6e 64 25 3d 6d | 65 6e 62 6c 6b 25 2b 26 |n_end%=m|enblk%+&|
|00001930| 43 30 30 3a 65 6e 64 62 | 75 66 66 25 3d 62 75 66 |C00:endb|uff%=buf|
|00001940| 66 25 2b 26 35 30 30 30 | 3a 6d 65 6e 75 5f 70 74 |f%+&5000|:menu_pt|
|00001950| 72 25 3d 6d 65 6e 62 6c | 6b 25 0d 0a 46 13 de 20 |r%=menbl|k%..F.. |
|00001960| 4d 69 25 20 32 30 2c 4d | 6f 25 20 32 30 0d 0a 50 |Mi% 20,M|o% 20..P|
|00001970| 4a f4 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |J. -----|--------|
|00001980| 20 49 6e 64 69 72 65 63 | 74 69 6f 6e 20 61 64 64 | Indirec|tion add|
|00001990| 72 65 73 73 65 73 20 66 | 6f 72 20 48 65 61 70 20 |resses f|or Heap |
|000019a0| 4d 61 6e 61 67 65 72 20 | 2d 2d 2d 2d 2d 2d 2d 2d |Manager |--------|
|000019b0| 2d 2d 2d 2d 2d 2d 2d 0d | 0a 5a 21 de 20 65 72 72 |-------.|.Z!. err|
|000019c0| 6f 72 61 6e 63 68 6f 72 | 25 20 33 2c 73 70 72 61 |oranchor|% 3,spra|
|000019d0| 6e 63 68 6f 72 25 20 33 | 0d 0a 64 21 21 65 72 72 |nchor% 3|..d!!err|
|000019e0| 6f 72 61 6e 63 68 6f 72 | 25 3d 30 3a 21 73 70 72 |oranchor|%=0:!spr|
|000019f0| 61 6e 63 68 6f 72 25 3d | 30 0d 0a 6e 22 de 20 74 |anchor%=|0..n". t|
|00001a00| 65 78 74 61 6e 63 68 6f | 72 25 20 33 3a 21 74 65 |extancho|r% 3:!te|
|00001a10| 78 74 61 6e 63 68 6f 72 | 25 3d 30 0d 0a 78 22 de |xtanchor|%=0..x".|
|00001a20| 20 66 6f 72 6d 61 6e 63 | 68 6f 72 25 20 33 3a 21 | formanc|hor% 3:!|
|00001a30| 66 6f 72 6d 61 6e 63 68 | 6f 72 25 3d 30 0d 0a 82 |formanch|or%=0...|
|00001a40| 22 de 20 73 70 72 73 61 | 6e 63 68 6f 72 25 20 33 |". sprsa|nchor% 3|
|00001a50| 3a 21 73 70 72 73 61 6e | 63 68 6f 72 25 3d 30 0d |:!sprsan|chor%=0.|
|00001a60| 0a 8c 22 de 20 6d 61 72 | 6b 61 6e 63 68 6f 72 25 |..". mar|kanchor%|
|00001a70| 20 33 3a 21 6d 61 72 6b | 61 6e 63 68 6f 72 25 3d | 3:!mark|anchor%=|
|00001a80| 30 0d 0a 96 20 de 20 63 | 73 76 61 6e 63 68 6f 72 |0... . c|svanchor|
|00001a90| 25 20 33 3a 21 63 73 76 | 61 6e 63 68 6f 72 25 3d |% 3:!csv|anchor%=|
|00001aa0| 30 0d 0a a0 20 de 20 73 | 65 6c 61 6e 63 68 6f 72 |0... . s|elanchor|
|00001ab0| 25 20 33 3a 21 73 65 6c | 61 6e 63 68 6f 72 25 3d |% 3:!sel|anchor%=|
|00001ac0| 30 0d 0a aa 16 de 20 6b | 65 79 61 6e 63 68 6f 72 |0..... k|eyanchor|
|00001ad0| 25 28 4b 25 2b 31 29 0d | 0a b4 14 de 20 74 61 62 |%(K%+1).|.... tab|
|00001ae0| 61 6e 63 68 6f 72 25 28 | 54 25 29 0d 0a be 13 de |anchor%(|T%).....|
|00001af0| 20 70 72 69 6e 74 72 65 | 6c 24 28 54 25 29 0d 0a | printre|l$(T%)..|
|00001b00| c8 05 e1 0d 0a d2 05 3a | 0d 0a dc 10 dd 20 f2 69 |.......:|..... .i|
|00001b10| 6e 69 74 5f 76 61 72 73 | 0d 0a e6 39 73 65 70 24 |nit_vars|...9sep$|
|00001b20| 3d 22 2c 22 3a 72 65 61 | 6c 24 3d 22 22 3a 76 69 |=",":rea|l$="":vi|
|00001b30| 73 69 62 6c 65 24 3d 22 | 22 3a 72 65 66 6f 72 6d |sible$="|":reform|
|00001b40| 24 3d 22 22 3a 63 61 6c | 63 66 69 65 6c 64 25 3d |$="":cal|cfield%=|
|00001b50| 30 0d 0a f0 0d 6d 79 72 | 65 66 25 3d 2d 31 0d 0a |0....myr|ef%=-1..|
|00001b60| fa 18 54 79 70 65 25 3d | 30 3a 66 69 65 6c 64 74 |..Type%=|0:fieldt|
|00001b70| 79 70 65 25 3d 31 0d 0b | 04 34 70 72 69 6e 74 69 |ype%=1..|.4printi|
|00001b80| 6e 67 25 3d a3 3a 69 6e | 64 65 78 69 6e 67 25 3d |ng%=.:in|dexing%=|
|00001b90| a3 3a 76 61 6c 69 64 61 | 74 65 25 3d b9 3a 72 65 |.:valida|te%=.:re|
|00001ba0| 6c 61 74 69 6f 6e 73 25 | 3d a3 0d 0b 0e 35 6d 75 |lations%|=....5mu|
|00001bb0| 6c 74 69 74 61 73 6b 69 | 6e 67 25 3d b9 3a 61 75 |ltitaski|ng%=.:au|
|00001bc0| 74 6f 73 61 76 65 25 3d | a3 3a 65 78 70 6f 72 74 |tosave%=|.:export|
|00001bd0| 25 3d a3 3a 73 61 76 65 | 69 6e 74 25 3d 31 30 0d |%=.:save|int%=10.|
|00001be0| 0b 18 38 70 72 65 73 65 | 6e 74 25 3d 30 3a 66 69 |..8prese|nt%=0:fi|
|00001bf0| 65 6c 64 73 25 3d 30 3a | 74 65 6d 70 6c 61 74 65 |elds%=0:|template|
|00001c00| 25 3d a3 3a 66 69 6c 74 | 65 72 25 3d a3 3a 61 64 |%=.:filt|er%=.:ad|
|00001c10| 6a 75 73 74 25 3d a3 0d | 0b 22 0d 4c 69 73 74 65 |just%=..|.".Liste|
|00001c20| 64 25 3d a3 0d 0b 2c 29 | 45 3d 30 3a 6c 6b 3d 30 |d%=...,)|E=0:lk=0|
|00001c30| 3a 56 3d 30 3a 63 68 3d | 30 3a 63 68 64 3d 30 3a |:V=0:ch=|0:chd=0:|
|00001c40| 46 3d 30 3a 68 61 6e 64 | 6c 65 25 3d 30 0d 0b 36 |F=0:hand|le%=0..6|
|00001c50| 13 24 64 61 74 65 25 3d | c4 36 2c bd 28 30 29 29 |.$date%=|.6,.(0))|
|00001c60| 0d 0b 40 22 6d 6f 76 65 | 74 79 70 65 25 3d 38 3a |..@"move|type%=8:|
|00001c70| 6d 6f 76 65 74 79 70 65 | 24 3d 22 4d 6f 76 65 20 |movetype|$="Move |
|00001c80| 89 22 0d 0b 4a 7a 71 75 | 69 74 25 3d a3 3a 65 78 |."..Jzqu|it%=.:ex|
|00001c90| 69 74 25 3d a3 3a 6d 61 | 74 63 68 69 6e 67 25 3d |it%=.:ma|tching%=|
|00001ca0| a3 3a 65 78 70 61 6e 64 | 25 3d a3 3a 6e 65 77 72 |.:expand|%=.:newr|
|00001cb0| 65 63 25 3d a3 3a 76 61 | 6c 25 3d a3 3a 72 61 6d |ec%=.:va|l%=.:ram|
|00001cc0| 25 3d a3 3a 41 63 63 65 | 73 73 25 3d a3 3a 4d 6f |%=.:Acce|ss%=.:Mo|
|00001cd0| 64 69 66 79 25 3d a3 3a | 77 61 72 6e 25 3d a3 3a |dify%=.:|warn%=.:|
|00001ce0| 64 65 73 69 67 6e 25 3d | a3 3a 6e 65 77 74 72 65 |design%=|.:newtre|
|00001cf0| 65 25 3d a3 3a 63 61 73 | 65 25 3d b9 0d 0b 54 2f |e%=.:cas|e%=...T/|
|00001d00| 4c 65 6e 4c 69 6e 65 25 | 3d 30 3a 48 6c 6f 6e 67 |LenLine%|=0:Hlong|
|00001d10| 65 73 74 25 3d 30 3a 44 | 6c 6f 6e 67 65 73 74 25 |est%=0:D|longest%|
|00001d20| 3d 30 3a 43 6f 75 6e 74 | 25 3d 30 0d 0b 5e 13 53 |=0:Count|%=0..^.S|
|00001d30| 74 61 72 74 25 3d 30 3a | 45 6e 64 25 3d 30 0d 0b |tart%=0:|End%=0..|
|00001d40| 68 0b 46 70 74 72 25 3d | 30 0d 0b 72 1e 46 69 65 |h.Fptr%=|0..r.Fie|
|00001d50| 6c 64 6e 75 6d 62 65 72 | 25 3d 30 3a 63 61 6c 63 |ldnumber|%=0:calc|
|00001d60| 6c 69 6e 6b 25 3d 30 0d | 0b 7c 19 4b 65 79 66 6c |link%=0.|.|.Keyfl|
|00001d70| 64 30 25 3d 30 3a 4b 65 | 79 66 6c 64 31 25 3d 30 |d0%=0:Ke|yfld1%=0|
|00001d80| 0d 0b 86 30 4c 61 73 74 | 54 61 62 6c 65 25 3d 2d |...0Last|Table%=-|
|00001d90| 31 3a 54 61 62 6c 65 6e | 75 6d 62 65 72 25 3d 2d |1:Tablen|umber%=-|
|00001da0| 31 3a 54 61 62 73 4c 6f | 61 64 65 64 24 3d 22 22 |1:TabsLo|aded$=""|
|00001db0| 0d 0b 90 0f 74 61 62 6c | 65 24 28 29 3d 22 22 0d |....tabl|e$()="".|
|00001dc0| 0b 9a 1f 52 6f 77 73 25 | 3d 30 3a 54 61 62 46 69 |...Rows%|=0:TabFi|
|00001dd0| 65 6c 64 73 25 3d 30 3a | 52 65 63 25 3d 30 0d 0b |elds%=0:|Rec%=0..|
|00001de0| a4 10 4d 61 74 63 68 5f | 74 61 67 25 3d 31 0d 0b |..Match_|tag%=1..|
|00001df0| ae 0c 66 61 73 74 25 3d | 31 30 0d 0b b8 30 4b 65 |..fast%=|10...0Ke|
|00001e00| 79 73 25 3d 30 3a 6b 65 | 79 6c 69 6d 69 74 25 3d |ys%=0:ke|ylimit%=|
|00001e10| 31 3a 6b 65 79 6c 65 6e | 25 3d 31 3a 4c 48 25 3d |1:keylen|%=1:LH%=|
|00001e20| 39 30 3a 65 61 63 68 25 | 3d a3 0d 0b c2 22 66 69 |90:each%|=...."fi|
|00001e30| 6c 65 25 3d 30 3a 6b 65 | 79 25 3d 30 3a 74 6f 70 |le%=0:ke|y%=0:top|
|00001e40| 3d 38 2a 66 69 6c 65 25 | 2b 4c 48 25 0d 0b cc 1b |=8*file%|+LH%....|
|00001e50| 6b 65 79 66 75 6e 63 25 | 3d 30 3a 6d 61 74 63 68 |keyfunc%|=0:match|
|00001e60| 66 75 6e 63 25 3d 30 0d | 0b d6 11 4b 65 79 73 25 |func%=0.|...Keys%|
|00001e70| 3d 30 3a 52 55 25 3d 30 | 0d 0b e0 12 70 72 69 6e |=0:RU%=0|....prin|
|00001e80| 74 6f 72 64 65 72 24 3d | 22 22 0d 0b ea 17 e3 20 |torder$=|""..... |
|00001e90| 49 25 3d 30 20 b8 20 4d | 61 78 4b 65 79 73 25 2b |I%=0 . M|axKeys%+|
|00001ea0| 31 0d 0b f4 2e de 20 41 | 25 20 33 3a 6b 65 79 61 |1..... A|% 3:keya|
|00001eb0| 6e 63 68 6f 72 25 28 49 | 25 29 3d 41 25 3a 21 6b |nchor%(I|%)=A%:!k|
|00001ec0| 65 79 61 6e 63 68 6f 72 | 25 28 49 25 29 3d 30 0d |eyanchor|%(I%)=0.|
|00001ed0| 0b fe 08 ed 20 49 25 0d | 0c 08 15 e3 20 49 25 3d |.... I%.|.... I%=|
|00001ee0| 30 20 b8 20 4d 61 78 54 | 61 62 73 25 0d 0c 12 2e |0 . MaxT|abs%....|
|00001ef0| de 20 41 25 20 33 3a 74 | 61 62 61 6e 63 68 6f 72 |. A% 3:t|abanchor|
|00001f00| 25 28 49 25 29 3d 41 25 | 3a 21 74 61 62 61 6e 63 |%(I%)=A%|:!tabanc|
|00001f10| 68 6f 72 25 28 49 25 29 | 3d 30 0d 0c 1c 08 ed 20 |hor%(I%)|=0..... |
|00001f20| 49 25 0d 0c 26 05 e1 0d | 0c 30 05 3a 0d 0c 3a 4b |I%..&...|.0.:..:K|
|00001f30| f4 20 57 69 6e 64 6f 77 | 20 68 61 6e 64 6c 69 6e |. Window| handlin|
|00001f40| 67 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |g ------|--------|
|00001f50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001f60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001f70| 2d 2d 2d 2d 2d 2d 2d 0d | 0c 44 05 3a 0d 0c 4e 15 |-------.|.D.:..N.|
|00001f80| dd 20 f2 63 72 65 61 74 | 65 5f 77 69 6e 64 6f 77 |. .creat|e_window|
|00001f90| 73 0d 0c 58 33 c8 99 20 | 22 57 69 6d 70 5f 4f 70 |s..X3.. |"Wimp_Op|
|00001fa0| 65 6e 54 65 6d 70 6c 61 | 74 65 22 2c 2c 22 3c 50 |enTempla|te",,"<P|
|00001fb0| 62 61 73 65 24 44 69 72 | 3e 2e 54 65 6d 70 6c 61 |base$Dir|>.Templa|
|00001fc0| 74 65 73 22 0d 0c 62 20 | 69 6e 66 6f 57 25 3d a4 |tes"..b |infoW%=.|
|00001fd0| 6e 65 77 5f 77 69 6e 64 | 6f 77 28 22 69 6e 66 6f |new_wind|ow("info|
|00001fe0| 22 2c 31 29 0d 0c 6c 1d | 24 a4 74 65 78 74 28 69 |",1)..l.|$.text(i|
|00001ff0| 6e 66 6f 57 25 2c 37 29 | 3d 76 65 72 73 69 6f 6e |nfoW%,7)|=version|
|00002000| 24 0d 0c 76 5c 6b 65 79 | 70 61 64 57 25 3d a4 6e |$..v\key|padW%=.n|
|00002010| 65 77 5f 77 69 6e 64 6f | 77 28 22 6b 65 79 70 61 |ew_windo|w("keypa|
|00002020| 64 22 2c 21 73 70 72 61 | 6e 63 68 6f 72 25 29 3a |d",!spra|nchor%):|
|00002030| 54 69 74 6c 65 25 3d 62 | 6c 6f 63 6b 25 21 37 32 |Title%=b|lock%!72|
|00002040| 3a 52 65 63 43 6f 75 6e | 74 25 3d a4 74 65 78 74 |:RecCoun|t%=.text|
|00002050| 28 6b 65 79 70 61 64 57 | 25 2c 31 37 29 0d 0c 80 |(keypadW|%,17)...|
|00002060| b9 73 61 76 65 61 70 70 | 57 25 3d a4 6e 65 77 5f |.saveapp|W%=.new_|
|00002070| 77 69 6e 64 6f 77 28 22 | 73 61 76 65 22 2c 31 29 |window("|save",1)|
|00002080| 3a 53 61 76 65 41 70 70 | 25 3d a4 74 65 78 74 28 |:SaveApp|%=.text(|
|00002090| 73 61 76 65 61 70 70 57 | 25 2c 30 29 3a 24 53 61 |saveappW|%,0):$Sa|
|000020a0| 76 65 41 70 70 25 3d 22 | 21 44 61 74 61 42 61 73 |veApp%="|!DataBas|
|000020b0| 65 22 3a 21 62 6c 6f 63 | 6b 25 3d 73 61 76 65 61 |e":!bloc|k%=savea|
|000020c0| 70 70 57 25 3a 62 6c 6f | 63 6b 25 21 34 3d 31 3a |ppW%:blo|ck%!4=1:|
|000020d0| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 49 63 6f 6e |.. "Wimp|_GetIcon|
|000020e0| 53 74 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 3a 24 |State",,|block%:$|
|000020f0| 62 6c 6f 63 6b 25 21 33 | 32 3d 22 73 6e 65 77 5f |block%!3|2="snew_|
|00002100| 61 70 70 3b 50 70 74 72 | 5f 68 61 6e 64 2c 31 32 |app;Pptr|_hand,12|
|00002110| 2c 38 3b 42 33 22 0d 0c | 8a 42 73 61 76 65 73 75 |,8;B3"..|.Bsavesu|
|00002120| 62 57 25 3d a4 6e 65 77 | 5f 77 69 6e 64 6f 77 28 |bW%=.new|_window(|
|00002130| 22 73 61 76 65 73 75 62 | 22 2c 31 29 3a 53 61 76 |"savesub|",1):Sav|
|00002140| 65 53 75 62 25 3d a4 74 | 65 78 74 28 73 61 76 65 |eSub%=.t|ext(save|
|00002150| 73 75 62 57 25 2c 30 29 | 0d 0c 94 9c 73 61 76 65 |subW%,0)|....save|
|00002160| 57 25 3d a4 6e 65 77 5f | 77 69 6e 64 6f 77 28 22 |W%=.new_|window("|
|00002170| 73 61 76 65 22 2c 31 29 | 3a 53 61 76 65 4c 69 73 |save",1)|:SaveLis|
|00002180| 74 25 3d a4 74 65 78 74 | 28 73 61 76 65 57 25 2c |t%=.text|(saveW%,|
|00002190| 30 29 3a 21 62 6c 6f 63 | 6b 25 3d 73 61 76 65 57 |0):!bloc|k%=saveW|
|000021a0| 25 3a 62 6c 6f 63 6b 25 | 21 34 3d 31 3a c8 99 20 |%:block%|!4=1:.. |
|000021b0| 22 57 69 6d 70 5f 47 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Ge|tIconSta|
|000021c0| 74 65 22 2c 2c 62 6c 6f | 63 6b 25 3a 24 62 6c 6f |te",,blo|ck%:$blo|
|000021d0| 63 6b 25 21 33 32 3d 22 | 73 66 69 6c 65 5f 66 66 |ck%!32="|sfile_ff|
|000021e0| 66 3b 50 70 74 72 5f 68 | 61 6e 64 2c 31 32 2c 38 |f;Pptr_h|and,12,8|
|000021f0| 3b 42 33 22 0d 0c 9e b9 | 73 61 76 65 5f 63 73 76 |;B3"....|save_csv|
|00002200| 57 25 3d a4 6e 65 77 5f | 77 69 6e 64 6f 77 28 22 |W%=.new_|window("|
|00002210| 73 61 76 65 22 2c 31 29 | 3a 53 61 76 65 43 53 56 |save",1)|:SaveCSV|
|00002220| 25 3d a4 74 65 78 74 28 | 73 61 76 65 5f 63 73 76 |%=.text(|save_csv|
|00002230| 57 25 2c 30 29 3a 21 62 | 6c 6f 63 6b 25 3d 73 61 |W%,0):!b|lock%=sa|
|00002240| 76 65 5f 63 73 76 57 25 | 3a 62 6c 6f 63 6b 25 21 |ve_csvW%|:block%!|
|00002250| 34 3d 31 3a c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |4=1:.. "|Wimp_Get|
|00002260| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |IconStat|e",,bloc|
|00002270| 6b 25 3a 43 53 56 5f 76 | 61 6c 69 64 25 3d 62 6c |k%:CSV_v|alid%=bl|
|00002280| 6f 63 6b 25 21 33 32 3a | 43 53 56 5f 76 61 6c 69 |ock%!32:|CSV_vali|
|00002290| 64 24 3d 22 50 70 74 72 | 5f 68 61 6e 64 2c 31 32 |d$="Pptr|_hand,12|
|000022a0| 2c 39 3b 42 33 3b 53 66 | 69 6c 65 5f 22 0d 0c a8 |,9;B3;Sf|ile_"...|
|000022b0| 43 73 65 61 72 63 68 57 | 25 3d a4 6e 65 77 5f 77 |CsearchW|%=.new_w|
|000022c0| 69 6e 64 6f 77 28 22 73 | 65 61 72 63 68 22 2c 21 |indow("s|earch",!|
|000022d0| 73 70 72 61 6e 63 68 6f | 72 25 29 3a 53 65 61 72 |sprancho|r%):Sear|
|000022e0| 63 68 49 6e 64 25 3d 62 | 6c 6f 63 6b 25 21 37 32 |chInd%=b|lock%!72|
|000022f0| 0d 0c b2 3a 64 61 74 61 | 64 69 63 57 25 3d a4 6e |...:data|dicW%=.n|
|00002300| 65 77 5f 77 69 6e 64 6f | 77 28 22 64 61 74 61 64 |ew_windo|w("datad|
|00002310| 69 63 22 2c 31 29 3a 54 | 61 62 54 69 74 6c 65 25 |ic",1):T|abTitle%|
|00002320| 3d 62 6c 6f 63 6b 25 21 | 37 32 0d 0c bc 4e 61 63 |=block%!|72...Nac|
|00002330| 63 65 73 73 57 25 3d a4 | 6e 65 77 5f 77 69 6e 64 |cessW%=.|new_wind|
|00002340| 6f 77 28 22 61 63 63 65 | 73 73 22 2c 31 29 3a 50 |ow("acce|ss",1):P|
|00002350| 61 73 73 77 6f 72 64 25 | 3d a4 74 65 78 74 28 61 |assword%|=.text(a|
|00002360| 63 63 65 73 73 57 25 2c | 30 29 3a 24 50 61 73 73 |ccessW%,|0):$Pass|
|00002370| 77 6f 72 64 25 3d 22 22 | 0d 0c c6 6a 70 61 73 73 |word%=""|...jpass|
|00002380| 57 25 3d a4 6e 65 77 5f | 77 69 6e 64 6f 77 28 22 |W%=.new_|window("|
|00002390| 70 61 73 73 77 6f 72 64 | 22 2c 31 29 3a 52 65 61 |password|",1):Rea|
|000023a0| 64 25 3d a4 74 65 78 74 | 28 70 61 73 73 57 25 2c |d%=.text|(passW%,|
|000023b0| 32 29 3a 57 72 69 74 65 | 25 3d a4 74 65 78 74 28 |2):Write|%=.text(|
|000023c0| 70 61 73 73 57 25 2c 33 | 29 3a 4d 61 6e 61 67 65 |passW%,3|):Manage|
|000023d0| 72 25 3d a4 74 65 78 74 | 28 70 61 73 73 57 25 2c |r%=.text|(passW%,|
|000023e0| 35 29 0d 0c d0 33 6d 61 | 69 6e 57 25 3d a4 6e 65 |5)...3ma|inW%=.ne|
|000023f0| 77 5f 77 69 6e 64 6f 77 | 28 22 6d 61 69 6e 22 2c |w_window|("main",|
|00002400| 31 29 3a 52 65 63 49 6e | 66 6f 25 3d 62 6c 6f 63 |1):RecIn|fo%=bloc|
|00002410| 6b 25 21 37 32 0d 0c da | 2e 6b 65 79 57 25 3d a4 |k%!72...|.keyW%=.|
|00002420| 6e 65 77 5f 77 69 6e 64 | 6f 77 28 22 63 68 61 6e |new_wind|ow("chan|
|00002430| 67 65 6b 65 79 22 2c 21 | 73 70 72 61 6e 63 68 6f |gekey",!|sprancho|
|00002440| 72 25 29 0d 0c e4 31 46 | 31 64 6b 65 79 25 3d a4 |r%)...1F|1dkey%=.|
|00002450| 74 65 78 74 28 6b 65 79 | 57 25 2c 30 29 3a 46 32 |text(key|W%,0):F2|
|00002460| 64 6b 65 79 25 3d a4 74 | 65 78 74 28 6b 65 79 57 |dkey%=.t|ext(keyW|
|00002470| 25 2c 31 29 0d 0c ee 0e | de 20 57 6b 65 79 25 28 |%,1)....|. Wkey%(|
|00002480| 33 29 0d 0c f8 11 e3 20 | 77 6f 72 64 25 3d 30 20 |3)..... |word%=0 |
|00002490| b8 20 33 0d 0d 02 25 57 | 6b 65 79 25 28 77 6f 72 |. 3...%W|key%(wor|
|000024a0| 64 25 29 3d a4 74 65 78 | 74 28 6b 65 79 57 25 2c |d%)=.tex|t(keyW%,|
|000024b0| 77 6f 72 64 25 2b 32 29 | 0d 0d 0c 0b ed 20 77 6f |word%+2)|..... wo|
|000024c0| 72 64 25 0d 0d 16 19 4b | 65 79 4e 6f 25 3d a4 74 |rd%....K|eyNo%=.t|
|000024d0| 65 78 74 28 6b 65 79 57 | 25 2c 36 29 0d 0d 20 45 |ext(keyW|%,6).. E|
|000024e0| 63 68 61 6e 67 65 57 25 | 3d a4 6e 65 77 5f 77 69 |changeW%|=.new_wi|
|000024f0| 6e 64 6f 77 28 22 63 68 | 61 6e 67 65 22 2c 21 73 |ndow("ch|ange",!s|
|00002500| 70 72 61 6e 63 68 6f 72 | 25 29 3a 43 68 61 6e 67 |pranchor|%):Chang|
|00002510| 65 54 69 74 6c 65 25 3d | 62 6c 6f 63 6b 25 21 37 |eTitle%=|block%!7|
|00002520| 32 0d 0d 2a 2a 6d 6f 76 | 65 57 25 3d a4 6e 65 77 |2..**mov|eW%=.new|
|00002530| 5f 77 69 6e 64 6f 77 28 | 22 6d 6f 76 65 22 2c 21 |_window(|"move",!|
|00002540| 73 70 72 61 6e 63 68 6f | 72 25 29 0d 0d 34 2c 74 |sprancho|r%)..4,t|
|00002550| 61 62 6c 65 57 25 3d a4 | 6e 65 77 5f 77 69 6e 64 |ableW%=.|new_wind|
|00002560| 6f 77 28 22 74 61 62 6c | 65 22 2c 21 73 70 72 61 |ow("tabl|e",!spra|
|00002570| 6e 63 68 6f 72 25 29 0d | 0d 3e 5a 6c 69 6e 6b 57 |nchor%).|.>ZlinkW|
|00002580| 25 3d a4 6e 65 77 5f 77 | 69 6e 64 6f 77 28 22 6c |%=.new_w|indow("l|
|00002590| 69 6e 6b 22 2c 21 73 70 | 72 61 6e 63 68 6f 72 25 |ink",!sp|ranchor%|
|000025a0| 29 3a 4c 69 6e 6b 54 69 | 74 6c 65 25 3d 62 6c 6f |):LinkTi|tle%=blo|
|000025b0| 63 6b 25 21 37 32 3a 54 | 61 62 6c 65 6e 61 6d 65 |ck%!72:T|ablename|
|000025c0| 25 3d a4 74 65 78 74 28 | 6c 69 6e 6b 57 25 2c 30 |%=.text(|linkW%,0|
|000025d0| 29 0d 0d 48 3a 6d 69 73 | 63 57 25 3d a4 6e 65 77 |)..H:mis|cW%=.new|
|000025e0| 5f 77 69 6e 64 6f 77 28 | 22 6d 69 73 63 22 2c 31 |_window(|"misc",1|
|000025f0| 29 3a 64 61 74 61 62 61 | 73 65 25 3d a4 74 65 78 |):databa|se%=.tex|
|00002600| 74 28 6d 69 73 63 57 25 | 2c 31 29 0d 0d 52 0f e3 |t(miscW%|,1)..R..|
|00002610| 20 69 63 25 3d 32 20 b8 | 20 37 0d 0d 5c 22 44 61 | ic%=2 .| 7..\"Da|
|00002620| 74 65 25 28 69 63 25 2d | 32 29 3d a4 74 65 78 74 |te%(ic%-|2)=.text|
|00002630| 28 6d 69 73 63 57 25 2c | 69 63 25 29 0d 0d 66 09 |(miscW%,|ic%)..f.|
|00002640| ed 20 69 63 25 0d 0d 70 | 4f 75 73 65 64 25 3d a4 |. ic%..p|Oused%=.|
|00002650| 74 65 78 74 28 6d 69 73 | 63 57 25 2c 31 37 29 3a |text(mis|cW%,17):|
|00002660| 66 69 6c 65 73 69 7a 65 | 25 3d a4 74 65 78 74 28 |filesize|%=.text(|
|00002670| 6d 69 73 63 57 25 2c 31 | 38 29 3a 70 65 72 63 65 |miscW%,1|8):perce|
|00002680| 6e 74 25 3d a4 74 65 78 | 74 28 6d 69 73 63 57 25 |nt%=.tex|t(miscW%|
|00002690| 2c 31 34 29 0d 0d 7a 2c | 70 72 69 6e 74 57 25 3d |,14)..z,|printW%=|
|000026a0| a4 6e 65 77 5f 77 69 6e | 64 6f 77 28 22 70 72 69 |.new_win|dow("pri|
|000026b0| 6e 74 22 2c 21 73 70 72 | 61 6e 63 68 6f 72 25 29 |nt",!spr|anchor%)|
|000026c0| 0d 0d 84 42 6d 61 74 63 | 68 57 25 3d a4 6e 65 77 |...Bmatc|hW%=.new|
|000026d0| 5f 77 69 6e 64 6f 77 28 | 22 6d 61 74 63 68 22 2c |_window(|"match",|
|000026e0| 21 73 70 72 61 6e 63 68 | 6f 72 25 29 3a 4d 61 74 |!spranch|or%):Mat|
|000026f0| 63 68 54 69 74 6c 65 25 | 3d 62 6c 6f 63 6b 25 21 |chTitle%|=block%!|
|00002700| 37 32 0d 0d 8e 2a 6c 69 | 73 74 57 25 3d a4 6e 65 |72...*li|stW%=.ne|
|00002710| 77 5f 77 69 6e 64 6f 77 | 28 22 6c 69 73 74 22 2c |w_window|("list",|
|00002720| 21 73 70 72 61 6e 63 68 | 6f 72 25 29 0d 0d 98 5b |!spranch|or%)...[|
|00002730| 63 72 65 61 74 65 57 25 | 3d a4 6e 65 77 5f 77 69 |createW%|=.new_wi|
|00002740| 6e 64 6f 77 28 22 63 72 | 65 61 74 65 22 2c 21 73 |ndow("cr|eate",!s|
|00002750| 70 72 61 6e 63 68 6f 72 | 25 29 3a 46 74 69 74 6c |pranchor|%):Ftitl|
|00002760| 65 54 65 78 74 25 3d 62 | 6c 6f 63 6b 25 21 37 32 |eText%=b|lock%!72|
|00002770| 3a 24 46 74 69 74 6c 65 | 54 65 78 74 25 3d 22 46 |:$Ftitle|Text%="F|
|00002780| 69 65 6c 64 20 30 22 0d | 0d a2 ce 44 65 73 63 54 |ield 0".|...DescT|
|00002790| 65 78 74 25 3d a4 74 65 | 78 74 28 63 72 65 61 74 |ext%=.te|xt(creat|
|000027a0| 65 57 25 2c 34 29 3a 54 | 61 67 54 65 78 74 25 3d |eW%,4):T|agText%=|
|000027b0| a4 74 65 78 74 28 63 72 | 65 61 74 65 57 25 2c 35 |.text(cr|eateW%,5|
|000027c0| 29 3a 4c 65 6e 54 65 78 | 74 25 3d a4 74 65 78 74 |):LenTex|t%=.text|
|000027d0| 28 63 72 65 61 74 65 57 | 25 2c 36 29 3a 49 4c 65 |(createW|%,6):ILe|
|000027e0| 6e 54 65 78 74 25 3d a4 | 74 65 78 74 28 63 72 65 |nText%=.|text(cre|
|000027f0| 61 74 65 57 25 2c 37 29 | 3a 56 61 6c 54 65 78 74 |ateW%,7)|:ValText|
|00002800| 25 3d a4 74 65 78 74 28 | 63 72 65 61 74 65 57 25 |%=.text(|createW%|
|00002810| 2c 38 29 3a 49 6e 73 54 | 65 78 74 25 3d a4 74 65 |,8):InsT|ext%=.te|
|00002820| 78 74 28 63 72 65 61 74 | 65 57 25 2c 31 33 29 3a |xt(creat|eW%,13):|
|00002830| 46 69 78 70 74 25 3d a4 | 74 65 78 74 28 63 72 65 |Fixpt%=.|text(cre|
|00002840| 61 74 65 57 25 2c 31 35 | 29 3a 24 46 69 78 70 74 |ateW%,15|):$Fixpt|
|00002850| 25 3d 22 32 22 0d 0d ac | 54 72 65 6c 61 74 65 57 |%="2"...|TrelateW|
|00002860| 25 3d a4 6e 65 77 5f 77 | 69 6e 64 6f 77 28 22 72 |%=.new_w|indow("r|
|00002870| 65 6c 61 74 69 6f 6e 22 | 2c 31 29 3a 52 65 6c 54 |elation"|,1):RelT|
|00002880| 69 74 6c 65 25 3d 62 6c | 6f 63 6b 25 21 37 32 3a |itle%=bl|ock%!72:|
|00002890| 66 69 65 6c 64 6e 75 6d | 25 3d a4 74 65 78 74 28 |fieldnum|%=.text(|
|000028a0| 6c 69 6e 6b 57 25 2c 32 | 29 0d 0d b6 7e 72 65 66 |linkW%,2|)...~ref|
|000028b0| 6f 72 6d 57 25 3d a4 6e | 65 77 5f 77 69 6e 64 6f |ormW%=.n|ew_windo|
|000028c0| 77 28 22 72 65 66 6f 72 | 6d 22 2c 21 73 70 72 61 |w("refor|m",!spra|
|000028d0| 6e 63 68 6f 72 25 29 3a | 21 62 6c 6f 63 6b 25 3d |nchor%):|!block%=|
|000028e0| 72 65 66 6f 72 6d 57 25 | 3a 62 6c 6f 63 6b 25 21 |reformW%|:block%!|
|000028f0| 34 3d 31 3a c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |4=1:.. "|Wimp_Get|
|00002900| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |IconStat|e",,bloc|
|00002910| 6b 25 3a 52 65 66 6d 54 | 69 74 6c 65 25 3d 62 6c |k%:RefmT|itle%=bl|
|00002920| 6f 63 6b 25 21 37 32 0d | 0d c0 29 63 6f 6c 57 25 |ock%!72.|..)colW%|
|00002930| 3d a4 6e 65 77 5f 77 69 | 6e 64 6f 77 28 22 63 6f |=.new_wi|ndow("co|
|00002940| 6c 73 22 2c 21 73 70 72 | 61 6e 63 68 6f 72 25 29 |ls",!spr|anchor%)|
|00002950| 0d 0d ca 2e 69 6e 66 6f | 72 6d 57 25 3d a4 6e 65 |....info|rmW%=.ne|
|00002960| 77 5f 77 69 6e 64 6f 77 | 28 22 69 6e 66 6f 72 6d |w_window|("inform|
|00002970| 22 2c 21 73 70 72 61 6e | 63 68 6f 72 25 29 0d 0d |",!spran|chor%)..|
|00002980| d4 44 63 61 6c 63 57 25 | 3d a4 6e 65 77 5f 77 69 |.DcalcW%|=.new_wi|
|00002990| 6e 64 6f 77 28 22 63 61 | 6c 63 22 2c 21 73 70 72 |ndow("ca|lc",!spr|
|000029a0| 61 6e 63 68 6f 72 25 29 | 3a 43 61 6c 63 46 6f 72 |anchor%)|:CalcFor|
|000029b0| 6d 25 3d a4 74 65 78 74 | 28 63 61 6c 63 57 25 2c |m%=.text|(calcW%,|
|000029c0| 30 29 0d 0d de 2c 6c 61 | 62 65 6c 57 25 3d a4 6e |0)...,la|belW%=.n|
|000029d0| 65 77 5f 77 69 6e 64 6f | 77 28 22 6c 61 62 65 6c |ew_windo|w("label|
|000029e0| 22 2c 21 73 70 72 61 6e | 63 68 6f 72 25 29 0d 0d |",!spran|chor%)..|
|000029f0| e8 26 70 73 65 6c 65 63 | 74 57 25 3d a4 6e 65 77 |.&pselec|tW%=.new|
|00002a00| 5f 77 69 6e 64 6f 77 28 | 22 70 73 65 6c 65 63 74 |_window(|"pselect|
|00002a10| 22 2c 31 29 0d 0d f2 1b | c8 99 20 22 57 69 6d 70 |",1)....|.. "Wimp|
|00002a20| 5f 43 6c 6f 73 65 54 65 | 6d 70 6c 61 74 65 22 0d |_CloseTe|mplate".|
|00002a30| 0d fc 05 e1 0d 0e 06 05 | 3a 0d 0e 10 1c dd 20 a4 |........|:..... .|
|00002a40| 6e 65 77 5f 77 69 6e 64 | 6f 77 28 6e 61 6d 65 24 |new_wind|ow(name$|
|00002a50| 2c 73 70 25 29 0d 0e 1a | 0d ea 20 68 61 6e 64 6c |,sp%)...|.. handl|
|00002a60| 65 25 0d 0e 24 46 c8 99 | 20 22 57 69 6d 70 5f 4c |e%..$F..| "Wimp_L|
|00002a70| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 62 6c |oadTempl|ate",,bl|
|00002a80| 6f 63 6b 25 2c 62 75 66 | 66 25 2c 65 6e 64 62 75 |ock%,buf|f%,endbu|
|00002a90| 66 66 25 2c 2d 31 2c 6e | 61 6d 65 24 2c 30 20 b8 |ff%,-1,n|ame$,0 .|
|00002aa0| 20 2c 2c 62 75 66 66 25 | 0d 0e 2e 11 62 6c 6f 63 | ,,buff%|....bloc|
|00002ab0| 6b 25 21 36 34 3d 73 70 | 25 0d 0e 38 2c c8 99 20 |k%!64=sp|%..8,.. |
|00002ac0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 57 69 6e 64 |"Wimp_Cr|eateWind|
|00002ad0| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 20 b8 20 68 61 |ow",,blo|ck% . ha|
|00002ae0| 6e 64 6c 65 25 0d 0e 42 | 0c 3d 68 61 6e 64 6c 65 |ndle%..B|.=handle|
|00002af0| 25 0d 0e 4c 05 3a 0d 0e | 56 13 dd 20 f2 73 68 6f |%..L.:..|V.. .sho|
|00002b00| 77 5f 77 69 6e 64 6f 77 | 73 0d 0e 60 1b f2 63 6c |w_window|s..`..cl|
|00002b10| 6f 73 65 5f 77 69 6e 64 | 6f 77 28 69 6e 66 6f 72 |ose_wind|ow(infor|
|00002b20| 6d 57 25 29 0d 0e 6a 18 | f2 6f 70 65 6e 5f 77 69 |mW%)..j.|.open_wi|
|00002b30| 6e 64 6f 77 28 6d 61 69 | 6e 57 25 29 0d 0e 74 18 |ndow(mai|nW%)..t.|
|00002b40| e7 20 28 70 72 65 73 65 | 6e 74 25 20 80 20 37 29 |. (prese|nt% . 7)|
|00002b50| 3d 37 20 8c 0d 0e 7e 1a | f2 6f 70 65 6e 5f 77 69 |=7 ...~.|.open_wi|
|00002b60| 6e 64 6f 77 28 6b 65 79 | 70 61 64 57 25 29 0d 0e |ndow(key|padW%)..|
|00002b70| 88 1c 61 64 64 72 3d a4 | 6d 6f 76 65 74 6f 28 6b |..addr=.|moveto(k|
|00002b80| 65 79 25 2c 74 6f 70 2c | 31 29 0d 0e 92 05 cd 0d |ey%,top,|1)......|
|00002b90| 0e 9c 24 e7 20 4c 69 73 | 74 65 64 25 20 8c 20 f2 |..$. Lis|ted% . .|
|00002ba0| 6f 70 65 6e 5f 77 69 6e | 64 6f 77 28 6c 69 73 74 |open_win|dow(list|
|00002bb0| 57 25 29 0d 0e a6 05 e1 | 0d 0e b0 05 3a 0d 0e ba |W%).....|....:...|
|00002bc0| 1c dd 20 f2 6f 70 65 6e | 5f 77 69 6e 64 6f 77 28 |.. .open|_window(|
|00002bd0| 77 68 61 6e 64 6c 65 25 | 29 0d 0e c4 15 62 6c 6f |whandle%|)....blo|
|00002be0| 63 6b 25 21 30 3d 77 68 | 61 6e 64 6c 65 25 0d 0e |ck%!0=wh|andle%..|
|00002bf0| ce 24 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 57 69 |.$.. "Wi|mp_GetWi|
|00002c00| 6e 64 6f 77 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |ndowStat|e",,bloc|
|00002c10| 6b 25 0d 0e d8 10 62 6c | 6f 63 6b 25 21 32 38 3d |k%....bl|ock%!28=|
|00002c20| 2d 31 0d 0e e2 20 c8 99 | 20 22 57 69 6d 70 5f 4f |-1... ..| "Wimp_O|
|00002c30| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |penWindo|w",,bloc|
|00002c40| 6b 25 0d 0e ec 05 e1 0d | 0e f6 05 3a 0d 0f 00 14 |k%......|...:....|
|00002c50| dd 20 f2 70 65 72 66 6f | 72 6d 5f 63 6c 6f 73 65 |. .perfo|rm_close|
|00002c60| 0d 0f 0a 10 c8 8e 20 21 | 62 6c 6f 63 6b 25 20 ca |...... !|block% .|
|00002c70| 0d 0f 14 19 c9 20 6d 61 | 74 63 68 57 25 3a 6d 61 |..... ma|tchW%:ma|
|00002c80| 74 63 68 69 6e 67 25 3d | a3 0d 0f 1e 18 c9 20 63 |tching%=|...... c|
|00002c90| 61 6c 63 57 25 3a 63 61 | 6c 63 6c 69 6e 6b 25 3d |alcW%:ca|lclink%=|
|00002ca0| 30 0d 0f 28 0c c9 20 6b | 65 79 57 25 3a 0d 0f 32 |0..(.. k|eyW%:..2|
|00002cb0| 18 64 65 73 69 67 6e 25 | 3d a3 3a 6e 65 77 74 72 |.design%|=.:newtr|
|00002cc0| 65 65 25 3d a3 0d 0f 3c | 1b 21 62 6c 6f 63 6b 25 |ee%=...<|.!block%|
|00002cd0| 3d 30 3a 62 6c 6f 63 6b | 25 21 34 3d 2d 36 37 32 |=0:block|%!4=-672|
|00002ce0| 0d 0f 46 1c 62 6c 6f 63 | 6b 25 21 38 3d 35 30 36 |..F.bloc|k%!8=506|
|00002cf0| 3a 62 6c 6f 63 6b 25 21 | 31 32 3d 30 0d 0f 50 24 |:block%!|12=0..P$|
|00002d00| c8 99 20 22 57 69 6d 70 | 5f 53 65 74 45 78 74 65 |.. "Wimp|_SetExte|
|00002d10| 6e 74 22 2c 6b 65 79 57 | 25 2c 62 6c 6f 63 6b 25 |nt",keyW|%,block%|
|00002d20| 0d 0f 5a 11 21 62 6c 6f | 63 6b 25 3d 6b 65 79 57 |..Z.!blo|ck%=keyW|
|00002d30| 25 0d 0f 64 1a c9 20 6d | 61 69 6e 57 25 3a f2 68 |%..d.. m|ainW%:.h|
|00002d40| 69 64 65 5f 77 69 6e 64 | 6f 77 73 0d 0f 6e 05 cb |ide_wind|ows..n..|
|00002d50| 0d 0f 78 1a f2 63 6c 6f | 73 65 5f 77 69 6e 64 6f |..x..clo|se_windo|
|00002d60| 77 28 21 62 6c 6f 63 6b | 25 29 0d 0f 82 05 e1 0d |w(!block|%)......|
|00002d70| 0f 8c 05 3a 0d 0f 96 13 | dd 20 f2 68 69 64 65 5f |...:....|. .hide_|
|00002d80| 77 69 6e 64 6f 77 73 0d | 0f a0 19 f2 63 6c 6f 73 |windows.|....clos|
|00002d90| 65 5f 77 69 6e 64 6f 77 | 28 6d 61 69 6e 57 25 29 |e_window|(mainW%)|
|00002da0| 0d 0f aa 1b f2 63 6c 6f | 73 65 5f 77 69 6e 64 6f |.....clo|se_windo|
|00002db0| 77 28 6b 65 79 70 61 64 | 57 25 29 0d 0f b4 1c f2 |w(keypad|W%).....|
|00002dc0| 63 6c 6f 73 65 5f 77 69 | 6e 64 6f 77 28 64 61 74 |close_wi|ndow(dat|
|00002dd0| 61 64 69 63 57 25 29 0d | 0f be 19 f2 63 6c 6f 73 |adicW%).|....clos|
|00002de0| 65 5f 77 69 6e 64 6f 77 | 28 6c 69 73 74 57 25 29 |e_window|(listW%)|
|00002df0| 0d 0f c8 1a f2 63 6c 6f | 73 65 5f 77 69 6e 64 6f |.....clo|se_windo|
|00002e00| 77 28 6d 61 74 63 68 57 | 25 29 0d 0f d2 1b f2 63 |w(matchW|%).....c|
|00002e10| 6c 6f 73 65 5f 77 69 6e | 64 6f 77 28 72 65 6c 61 |lose_win|dow(rela|
|00002e20| 74 65 57 25 29 0d 0f dc | 1b f2 63 6c 6f 73 65 5f |teW%)...|..close_|
|00002e30| 77 69 6e 64 6f 77 28 73 | 65 61 72 63 68 57 25 29 |window(s|earchW%)|
|00002e40| 0d 0f e6 18 f2 63 6c 6f | 73 65 5f 77 69 6e 64 6f |.....clo|se_windo|
|00002e50| 77 28 6b 65 79 57 25 29 | 0d 0f f0 1b f2 63 6c 6f |w(keyW%)|.....clo|
|00002e60| 73 65 5f 77 69 6e 64 6f | 77 28 72 65 66 6f 72 6d |se_windo|w(reform|
|00002e70| 57 25 29 0d 0f fa 05 e1 | 0d 10 04 05 3a 0d 10 0e |W%).....|....:...|
|00002e80| 1d dd 20 f2 63 6c 6f 73 | 65 5f 77 69 6e 64 6f 77 |.. .clos|e_window|
|00002e90| 28 77 68 61 6e 64 6c 65 | 25 29 0d 10 18 14 21 62 |(whandle|%)....!b|
|00002ea0| 6c 6f 63 6b 25 3d 77 68 | 61 6e 64 6c 65 25 0d 10 |lock%=wh|andle%..|
|00002eb0| 22 21 c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |"!.. "Wi|mp_Close|
|00002ec0| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|00002ed0| 10 2c 05 e1 0d 10 36 05 | 3a 0d 10 40 16 dd 20 f2 |.,....6.|:..@.. .|
|00002ee0| 72 65 64 72 61 77 28 68 | 61 6e 64 6c 65 25 29 0d |redraw(h|andle%).|
|00002ef0| 10 4a 13 21 62 6c 6f 63 | 6b 25 3d 68 61 6e 64 6c |.J.!bloc|k%=handl|
|00002f00| 65 25 0d 10 54 2a c8 99 | 20 22 57 69 6d 70 5f 52 |e%..T*..| "Wimp_R|
|00002f10| 65 64 72 61 77 57 69 6e | 64 6f 77 22 2c 2c 62 6c |edrawWin|dow",,bl|
|00002f20| 6f 63 6b 25 20 b8 20 6d | 6f 72 65 25 0d 10 5e 1f |ock% . m|ore%..^.|
|00002f30| f2 67 65 74 5f 6f 72 69 | 67 69 6e 28 62 6c 6f 63 |.get_ori|gin(bloc|
|00002f40| 6b 25 2c 78 30 25 2c 79 | 30 25 29 0d 10 68 0c c8 |k%,x0%,y|0%)..h..|
|00002f50| 95 20 6d 6f 72 65 25 0d | 10 72 12 f2 64 72 61 77 |. more%.|.r..draw|
|00002f60| 28 78 30 25 2c 79 30 25 | 29 0d 10 7c 39 e7 20 68 |(x0%,y0%|)..|9. h|
|00002f70| 61 6e 64 6c 65 25 3c 3e | 64 61 74 61 64 69 63 57 |andle%<>|datadicW|
|00002f80| 25 20 8c 20 c8 99 20 22 | 57 69 6d 70 5f 42 6f 72 |% . .. "|Wimp_Bor|
|00002f90| 64 65 72 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |derWindo|w",,bloc|
|00002fa0| 6b 25 0d 10 86 2a c8 99 | 20 22 57 69 6d 70 5f 47 |k%...*..| "Wimp_G|
|00002fb0| 65 74 52 65 63 74 61 6e | 67 6c 65 22 2c 2c 62 6c |etRectan|gle",,bl|
|00002fc0| 6f 63 6b 25 20 b8 20 6d | 6f 72 65 25 0d 10 90 05 |ock% . m|ore%....|
|00002fd0| ce 0d 10 9a 05 e1 0d 10 | a4 05 3a 0d 10 ae 25 dd |........|..:...%.|
|00002fe0| 20 f2 67 65 74 5f 6f 72 | 69 67 69 6e 28 62 6c 6f | .get_or|igin(blo|
|00002ff0| 63 6b 25 2c f8 20 78 30 | 25 2c f8 20 79 30 25 29 |ck%,. x0|%,. y0%)|
|00003000| 0d 10 b8 1a 78 30 25 3d | 62 6c 6f 63 6b 25 21 34 |....x0%=|block%!4|
|00003010| 2d 62 6c 6f 63 6b 25 21 | 32 30 0d 10 c2 1b 79 30 |-block%!|20....y0|
|00003020| 25 3d 62 6c 6f 63 6b 25 | 21 31 36 2d 62 6c 6f 63 |%=block%|!16-bloc|
|00003030| 6b 25 21 32 34 0d 10 cc | 05 e1 0d 10 d6 05 3a 0d |k%!24...|......:.|
|00003040| 10 e0 14 dd 20 f2 64 72 | 61 77 28 78 30 25 2c 79 |.... .dr|aw(x0%,y|
|00003050| 30 25 29 0d 10 ea 20 ea | 20 54 65 78 74 50 74 72 |0%)... .| TextPtr|
|00003060| 25 2c 79 31 25 2c 79 32 | 25 2c 49 25 2c 63 68 61 |%,y1%,y2|%,I%,cha|
|00003070| 72 73 25 0d 10 f4 10 c8 | 8e 20 68 61 6e 64 6c 65 |rs%.....|. handle|
|00003080| 25 20 ca 0d 10 fe 0c c9 | 20 6c 69 73 74 57 25 0d |% ......| listW%.|
|00003090| 11 08 18 79 31 25 3d 2d | 28 62 6c 6f 63 6b 25 21 |...y1%=-|(block%!|
|000030a0| 34 30 2d 79 30 25 29 0d | 11 12 18 79 32 25 3d 2d |40-y0%).|...y2%=-|
|000030b0| 28 62 6c 6f 63 6b 25 21 | 33 32 2d 79 30 25 29 0d |(block%!|32-y0%).|
|000030c0| 11 1c 12 79 31 25 3d 79 | 31 25 20 81 20 33 32 2b |...y1%=y|1% . 32+|
|000030d0| 31 0d 11 26 12 79 32 25 | 3d 79 32 25 20 81 20 33 |1..&.y2%|=y2% . 3|
|000030e0| 32 2b 31 0d 11 30 2c 54 | 65 78 74 50 74 72 25 3d |2+1..0,T|extPtr%=|
|000030f0| 28 21 74 65 78 74 61 6e | 63 68 6f 72 25 29 2b 28 |(!textan|chor%)+(|
|00003100| 79 31 25 2d 31 29 2a 4c | 65 6e 4c 69 6e 65 25 0d |y1%-1)*L|enLine%.|
|00003110| 11 3a 1d e7 20 79 32 25 | 3e 43 6f 75 6e 74 25 20 |.:.. y2%|>Count% |
|00003120| 8c 20 79 32 25 3d 43 6f | 75 6e 74 25 0d 11 44 12 |. y2%=Co|unt%..D.|
|00003130| e3 20 49 25 3d 79 31 25 | 20 b8 20 79 32 25 0d 11 |. I%=y1%| . y2%..|
|00003140| 4e 12 f2 64 72 61 77 5f | 6c 69 6e 65 28 49 25 29 |N..draw_|line(I%)|
|00003150| 0d 11 58 16 54 65 78 74 | 50 74 72 25 2b 3d 4c 65 |..X.Text|Ptr%+=Le|
|00003160| 6e 4c 69 6e 65 25 0d 11 | 62 08 ed 20 49 25 0d 11 |nLine%..|b.. I%..|
|00003170| 6c 05 cb 0d 11 76 05 e1 | 0d 11 80 05 3a 0d 11 8a |l....v..|....:...|
|00003180| 17 dd 20 f2 64 72 61 77 | 5f 6c 69 6e 65 28 4c 69 |.. .draw|_line(Li|
|00003190| 6e 65 25 29 0d 11 94 1c | ec 20 78 30 25 2c 79 30 |ne%)....|. x0%,y0|
|000031a0| 25 2d 28 4c 69 6e 65 25 | 2d 31 29 2a 33 32 2d 34 |%-(Line%|-1)*32-4|
|000031b0| 0d 11 9e 24 c8 99 20 22 | 4f 53 5f 57 72 69 74 65 |...$.. "|OS_Write|
|000031c0| 4e 22 2c 54 65 78 74 50 | 74 72 25 2c 4c 65 6e 4c |N",TextP|tr%,LenL|
|000031d0| 69 6e 65 25 0d 11 a8 05 | e1 0d 11 b2 05 3a 0d 11 |ine%....|.....:..|
|000031e0| bc 05 3a 0d 11 c6 4b f4 | 20 4d 65 6e 75 20 68 61 |..:...K.| Menu ha|
|000031f0| 6e 64 6c 69 6e 67 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ndling -|--------|
|00003200| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003210| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003220| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 11 |--------|------..|
|00003230| d0 05 3a 0d 11 da 11 dd | 20 f2 6d 61 6b 65 5f 6d |..:.....| .make_m|
|00003240| 65 6e 75 73 0d 11 e4 08 | ea 20 49 25 0d 11 ee 3f |enus....|. I%...?|
|00003250| 6d 65 6e 75 25 28 38 29 | 3d a4 63 72 65 61 74 65 |menu%(8)|=.create|
|00003260| 5f 6d 65 6e 75 28 6d 65 | 6e 75 5f 70 74 72 25 2c |_menu(me|nu_ptr%,|
|00003270| 31 35 30 2c 22 53 65 6c | 65 63 74 69 6f 6e 3a 2c |150,"Sel|ection:,|
|00003280| 22 2b c4 31 33 2c 22 30 | 22 29 29 0d 11 f8 16 6d |"+.13,"0|"))....m|
|00003290| 65 6e 69 63 25 3d 6d 65 | 6e 75 25 28 38 29 2b 32 |enic%=me|nu%(8)+2|
|000032a0| 38 0d 12 02 2f 53 65 6c | 70 6f 73 25 3d 6d 65 6e |8.../Sel|pos%=men|
|000032b0| 69 63 25 21 31 32 3a 6d | 65 6e 69 63 25 21 31 36 |ic%!12:m|enic%!16|
|000032c0| 3d 2d 31 3a 6d 65 6e 69 | 63 25 21 32 30 3d 31 31 |=-1:meni|c%!20=11|
|000032d0| 0d 12 0c 1c 3f 6d 65 6e | 69 63 25 3d 3f 6d 65 6e |....?men|ic%=?men|
|000032e0| 69 63 25 20 84 20 28 31 | 3c 3c 32 29 0d 12 16 3c |ic% . (1|<<2)...<|
|000032f0| 6d 65 6e 75 25 28 31 36 | 29 3d a4 63 72 65 61 74 |menu%(16|)=.creat|
|00003300| 65 5f 6d 65 6e 75 28 6d | 65 6e 75 5f 70 74 72 25 |e_menu(m|enu_ptr%|
|00003310| 2c 31 35 30 2c 22 51 75 | 65 72 79 3a 2c 22 2b c4 |,150,"Qu|ery:,"+.|
|00003320| 31 33 2c 22 30 22 29 29 | 0d 12 20 17 6d 65 6e 69 |13,"0"))|.. .meni|
|00003330| 63 25 3d 6d 65 6e 75 25 | 28 31 36 29 2b 32 38 0d |c%=menu%|(16)+28.|
|00003340| 12 2a 2d 51 70 6f 73 25 | 3d 6d 65 6e 69 63 25 21 |.*-Qpos%|=menic%!|
|00003350| 31 32 3a 6d 65 6e 69 63 | 25 21 31 36 3d 2d 31 3a |12:menic|%!16=-1:|
|00003360| 6d 65 6e 69 63 25 21 32 | 30 3d 31 31 0d 12 34 1c |menic%!2|0=11..4.|
|00003370| 3f 6d 65 6e 69 63 25 3d | 3f 6d 65 6e 69 63 25 20 |?menic%=|?menic% |
|00003380| 84 20 28 31 3c 3c 32 29 | 0d 12 3e 3e 6d 65 6e 75 |. (1<<2)|..>>menu|
|00003390| 25 28 31 39 29 3d a4 63 | 72 65 61 74 65 5f 6d 65 |%(19)=.c|reate_me|
|000033a0| 6e 75 28 6d 65 6e 75 5f | 70 74 72 25 2c 31 35 30 |nu(menu_|ptr%,150|
|000033b0| 2c 22 4f 70 74 69 6f 6e | 73 3a 2c 22 2b c4 31 33 |,"Option|s:,"+.13|
|000033c0| 2c 22 30 22 29 29 0d 12 | 48 17 6d 65 6e 69 63 25 |,"0"))..|H.menic%|
|000033d0| 3d 6d 65 6e 75 25 28 31 | 39 29 2b 32 38 0d 12 52 |=menu%(1|9)+28..R|
|000033e0| 2f 4f 70 74 70 6f 73 25 | 3d 6d 65 6e 69 63 25 21 |/Optpos%|=menic%!|
|000033f0| 31 32 3a 6d 65 6e 69 63 | 25 21 31 36 3d 2d 31 3a |12:menic|%!16=-1:|
|00003400| 6d 65 6e 69 63 25 21 32 | 30 3d 31 31 0d 12 5c 1c |menic%!2|0=11..\.|
|00003410| 3f 6d 65 6e 69 63 25 3d | 3f 6d 65 6e 69 63 25 20 |?menic%=|?menic% |
|00003420| 84 20 28 31 3c 3c 32 29 | 0d 12 66 3e 6d 65 6e 75 |. (1<<2)|..f>menu|
|00003430| 25 28 31 31 29 3d a4 63 | 72 65 61 74 65 5f 6d 65 |%(11)=.c|reate_me|
|00003440| 6e 75 28 6d 65 6e 75 5f | 70 74 72 25 2c 31 30 30 |nu(menu_|ptr%,100|
|00003450| 2c 22 52 65 63 6f 72 64 | 73 3a 2c 22 2b c4 31 33 |,"Record|s:,"+.13|
|00003460| 2c 22 30 22 29 29 0d 12 | 70 17 6d 65 6e 69 63 25 |,"0"))..|p.menic%|
|00003470| 3d 6d 65 6e 75 25 28 31 | 31 29 2b 32 38 0d 12 7a |=menu%(1|1)+28..z|
|00003480| 3d 52 65 63 6f 72 64 73 | 25 3d 6d 65 6e 69 63 25 |=Records|%=menic%|
|00003490| 21 31 32 3a 6d 65 6e 69 | 63 25 21 31 36 3d 62 75 |!12:meni|c%!16=bu|
|000034a0| 66 66 25 3a 24 62 75 66 | 66 25 3d 22 41 30 2d 39 |ff%:$buf|f%="A0-9|
|000034b0| 22 3a 62 75 66 66 25 2b | 3d 35 0d 12 84 2c 3f 6d |":buff%+|=5...,?m|
|000034c0| 65 6e 69 63 25 3d 3f 6d | 65 6e 69 63 25 20 84 20 |enic%=?m|enic% . |
|000034d0| 28 31 3c 3c 32 29 3a 24 | 52 65 63 6f 72 64 73 25 |(1<<2):$|Records%|
|000034e0| 3d 22 31 30 30 22 0d 12 | 8e 9d 6d 65 6e 75 25 28 |="100"..|..menu%(|
|000034f0| 31 30 29 3d a4 63 72 65 | 61 74 65 5f 6d 65 6e 75 |10)=.cre|ate_menu|
|00003500| 28 6d 65 6e 75 5f 70 74 | 72 25 2c 32 35 30 2c 22 |(menu_pt|r%,250,"|
|00003510| 46 69 65 6c 64 2c 49 6e | 64 65 78 20 66 69 65 6c |Field,In|dex fiel|
|00003520| 64 21 22 2b c3 28 6b 65 | 79 57 25 29 2b 22 2c 47 |d!"+.(ke|yW%)+",G|
|00003530| 6c 6f 62 61 6c 20 63 68 | 61 6e 67 65 73 21 22 2b |lobal ch|anges!"+|
|00003540| c3 28 63 68 61 6e 67 65 | 57 25 29 2b 22 2c 4c 69 |.(change|W%)+",Li|
|00003550| 6e 6b 20 74 6f 20 74 61 | 62 6c 65 21 22 2b c3 28 |nk to ta|ble!"+.(|
|00003560| 6c 69 6e 6b 57 25 29 2b | 22 2c 43 61 6c 63 75 6c |linkW%)+|",Calcul|
|00003570| 61 74 69 6f 6e 73 21 22 | 2b c3 28 63 61 6c 63 57 |ations!"|+.(calcW|
|00003580| 25 29 29 0d 12 98 3f 6d | 65 6e 75 25 28 31 33 29 |%))...?m|enu%(13)|
|00003590| 3d a4 63 72 65 61 74 65 | 5f 6d 65 6e 75 28 6d 65 |=.create|_menu(me|
|000035a0| 6e 75 5f 70 74 72 25 2c | 31 32 30 2c 22 49 6e 74 |nu_ptr%,|120,"Int|
|000035b0| 65 72 76 61 6c 3a 2c 22 | 2b c4 31 33 2c 22 30 22 |erval:,"|+.13,"0"|
|000035c0| 29 29 0d 12 a2 17 6d 65 | 6e 69 63 25 3d 6d 65 6e |))....me|nic%=men|
|000035d0| 75 25 28 31 33 29 2b 32 | 38 0d 12 ac 3e 49 6e 74 |u%(13)+2|8...>Int|
|000035e0| 65 72 76 61 6c 25 3d 6d | 65 6e 69 63 25 21 31 32 |erval%=m|enic%!12|
|000035f0| 3a 6d 65 6e 69 63 25 21 | 31 36 3d 62 75 66 66 25 |:menic%!|16=buff%|
|00003600| 3a 24 62 75 66 66 25 3d | 22 41 30 2d 39 22 3a 62 |:$buff%=|"A0-9":b|
|00003610| 75 66 66 25 2b 3d 35 0d | 12 b6 30 3f 6d 65 6e 69 |uff%+=5.|..0?meni|
|00003620| 63 25 3d 3f 6d 65 6e 69 | 63 25 20 84 20 28 31 3c |c%=?meni|c% . (1<|
|00003630| 3c 32 29 3a 24 49 6e 74 | 65 72 76 61 6c 25 3d 22 |<2):$Int|erval%="|
|00003640| 31 30 20 6d 69 6e 22 0d | 12 c0 73 6d 65 6e 75 25 |10 min".|..smenu%|
|00003650| 28 31 32 29 3d a4 63 72 | 65 61 74 65 5f 6d 65 6e |(12)=.cr|eate_men|
|00003660| 75 28 6d 65 6e 75 5f 70 | 74 72 25 2c 31 36 30 2c |u(menu_p|tr%,160,|
|00003670| 22 53 61 76 65 20 69 6e | 64 69 63 65 73 2c 41 75 |"Save in|dices,Au|
|00003680| 74 6f 6d 61 74 69 63 3e | 22 2b c3 28 6d 65 6e 75 |tomatic>|"+.(menu|
|00003690| 25 28 31 33 29 29 2b 22 | 2c 57 61 72 6e 69 6e 67 |%(13))+"|,Warning|
|000036a0| 3e 22 2b c3 28 6d 65 6e | 75 25 28 31 33 29 29 2b |>"+.(men|u%(13))+|
|000036b0| 22 2c 4d 61 6e 75 61 6c | 22 29 0d 12 ca 47 6d 65 |",Manual|")...Gme|
|000036c0| 6e 75 25 28 35 29 3d a4 | 63 72 65 61 74 65 5f 6d |nu%(5)=.|create_m|
|000036d0| 65 6e 75 28 6d 65 6e 75 | 5f 70 74 72 25 2c 31 34 |enu(menu|_ptr%,14|
|000036e0| 30 2c 22 54 61 62 6c 65 | 73 22 2b c4 4d 61 78 54 |0,"Table|s"+.MaxT|
|000036f0| 61 62 73 25 2b 31 2c 22 | 2c 7e 4e 6f 6e 65 22 29 |abs%+1,"|,~None")|
|00003700| 29 0d 12 d4 9e 6d 65 6e | 75 25 28 32 29 3d a4 63 |)....men|u%(2)=.c|
|00003710| 72 65 61 74 65 5f 6d 65 | 6e 75 28 6d 65 6e 75 5f |reate_me|nu(menu_|
|00003720| 70 74 72 25 2c 32 36 35 | 2c 22 56 61 6c 69 64 61 |ptr%,265|,"Valida|
|00003730| 74 69 6f 6e 2c 43 72 65 | 61 74 65 20 74 61 62 6c |tion,Cre|ate tabl|
|00003740| 65 3e 22 2b c3 28 74 61 | 62 6c 65 57 25 29 2b 22 |e>"+.(ta|bleW%)+"|
|00003750| 2c 44 69 73 70 6c 61 79 | 20 74 61 62 6c 65 3e 22 |,Display| table>"|
|00003760| 2b c3 28 6d 65 6e 75 25 | 28 35 29 29 2b 22 2c 53 |+.(menu%|(5))+",S|
|00003770| 68 6f 77 20 74 61 62 6c | 65 20 66 69 6c 65 73 2c |how tabl|e files,|
|00003780| 56 61 6c 69 64 61 74 65 | 20 69 6e 70 75 74 2c 53 |Validate| input,S|
|00003790| 68 6f 77 20 72 65 6c 61 | 74 69 6f 6e 73 22 29 0d |how rela|tions").|
|000037a0| 12 de 17 f2 74 69 63 6b | 28 6d 65 6e 75 25 28 32 |....tick|(menu%(2|
|000037b0| 29 2c 33 2c b9 29 0d 12 | e8 b5 6d 65 6e 75 25 28 |),3,.)..|..menu%(|
|000037c0| 37 29 3d a4 63 72 65 61 | 74 65 5f 6d 65 6e 75 28 |7)=.crea|te_menu(|
|000037d0| 6d 65 6e 75 5f 70 74 72 | 25 2c 32 32 30 2c 22 4d |menu_ptr|%,220,"M|
|000037e0| 69 73 63 2e 2c 42 61 74 | 63 68 20 64 65 6c 65 74 |isc.,Bat|ch delet|
|000037f0| 65 21 22 2b c3 28 6d 6f | 76 65 57 25 29 2b 22 2c |e!"+.(mo|veW%)+",|
|00003800| 53 65 74 20 70 61 73 73 | 77 6f 72 64 73 3e 22 2b |Set pass|words>"+|
|00003810| c3 28 70 61 73 73 57 25 | 29 2b 22 2c 43 6f 6c 6f |.(passW%|)+",Colo|
|00003820| 75 72 73 21 22 2b c3 28 | 63 6f 6c 57 25 29 2b 22 |urs!"+.(|colW%)+"|
|00003830| 2c 53 61 76 65 20 69 6e | 64 69 63 65 73 3e 22 2b |,Save in|dices>"+|
|00003840| c3 28 6d 65 6e 75 25 28 | 31 32 29 29 2b 22 2c 45 |.(menu%(|12))+",E|
|00003850| 64 69 74 20 74 65 6d 70 | 6c 61 74 65 2c 4d 75 6c |dit temp|late,Mul|
|00003860| 74 69 74 61 73 6b 69 6e | 67 22 29 0d 12 f2 17 f2 |titaskin|g").....|
|00003870| 74 69 63 6b 28 6d 65 6e | 75 25 28 37 29 2c 35 2c |tick(men|u%(7),5,|
|00003880| b9 29 0d 12 fc 4f 6d 65 | 6e 75 25 28 31 35 29 3d |.)...Ome|nu%(15)=|
|00003890| a4 63 72 65 61 74 65 5f | 6d 65 6e 75 28 6d 65 6e |.create_|menu(men|
|000038a0| 75 5f 70 74 72 25 2c 31 | 32 30 2c 22 44 65 6c 69 |u_ptr%,1|20,"Deli|
|000038b0| 6d 69 74 65 72 2c 43 6f | 6d 6d 61 2c 54 41 42 2c |miter,Co|mma,TAB,|
|000038c0| 43 52 2c 4c 46 2c 22 2b | c4 31 33 2c 22 30 22 29 |CR,LF,"+|.13,"0")|
|000038d0| 29 0d 13 06 1c f2 74 69 | 63 6b 5f 6f 6e 65 28 6d |).....ti|ck_one(m|
|000038e0| 65 6e 75 25 28 31 35 29 | 2c 34 2c 30 29 0d 13 10 |enu%(15)|,4,0)...|
|000038f0| 1e 6d 65 6e 69 63 25 3d | 6d 65 6e 75 25 28 31 35 |.menic%=|menu%(15|
|00003900| 29 2b 32 38 2b 28 34 2a | 32 34 29 0d 13 1a 2d 44 |)+28+(4*|24)...-D|
|00003910| 65 6c 69 6d 25 3d 6d 65 | 6e 69 63 25 21 31 32 3a |elim%=me|nic%!12:|
|00003920| 6d 65 6e 69 63 25 21 31 | 36 3d 2d 31 3a 6d 65 6e |menic%!1|6=-1:men|
|00003930| 69 63 25 21 32 30 3d 32 | 0d 13 24 27 3f 6d 65 6e |ic%!20=2|..$'?men|
|00003940| 69 63 25 3d 3f 6d 65 6e | 69 63 25 20 84 20 28 31 |ic%=?men|ic% . (1|
|00003950| 3c 3c 32 29 3a 24 44 65 | 6c 69 6d 25 3d 22 22 0d |<<2):$De|lim%="".|
|00003960| 13 2e f1 6d 24 3d 22 50 | 72 69 6e 74 2c 4d 61 74 |...m$="P|rint,Mat|
|00003970| 63 68 2c 53 68 6f 77 20 | 72 65 73 6f 75 72 63 65 |ch,Show |resource|
|00003980| 73 2c 53 68 6f 77 20 6a | 6f 62 73 20 64 6f 6e 65 |s,Show j|obs done|
|00003990| 2c 4f 70 74 69 6f 6e 73 | 3e 22 2b c3 28 70 72 69 |,Options|>"+.(pri|
|000039a0| 6e 74 57 25 29 2b 22 2c | 53 61 76 65 20 6f 70 74 |ntW%)+",|Save opt|
|000039b0| 69 6f 6e 73 3e 22 2b c3 | 28 6d 65 6e 75 25 28 31 |ions>"+.|(menu%(1|
|000039c0| 39 29 29 2b 22 2c 53 61 | 76 65 20 71 75 65 72 79 |9))+",Sa|ve query|
|000039d0| 3e 22 2b c3 28 6d 65 6e | 75 25 28 31 36 29 29 2b |>"+.(men|u%(16))+|
|000039e0| 22 2c 7e 4e 75 6d 65 72 | 69 63 20 66 69 65 6c 64 |",~Numer|ic field|
|000039f0| 73 3e 22 2b c3 28 70 73 | 65 6c 65 63 74 57 25 29 |s>"+.(ps|electW%)|
|00003a00| 2b 22 2c 7e 53 61 76 65 | 20 73 65 6c 65 63 74 69 |+",~Save| selecti|
|00003a10| 6f 6e 3e 22 2b c3 28 6d | 65 6e 75 25 28 38 29 29 |on>"+.(m|enu%(8))|
|00003a20| 2b 22 2c 7e 43 6c 65 61 | 72 20 73 65 6c 65 63 74 |+",~Clea|r select|
|00003a30| 69 6f 6e 2c 53 65 74 20 | 64 65 6c 69 6d 69 74 65 |ion,Set |delimite|
|00003a40| 72 3e 22 2b c3 28 6d 65 | 6e 75 25 28 31 35 29 29 |r>"+.(me|nu%(15))|
|00003a50| 0d 13 38 2b 6d 65 6e 75 | 25 28 36 29 3d a4 63 72 |..8+menu|%(6)=.cr|
|00003a60| 65 61 74 65 5f 6d 65 6e | 75 28 6d 65 6e 75 5f 70 |eate_men|u(menu_p|
|00003a70| 74 72 25 2c 32 35 30 2c | 6d 24 29 0d 13 42 e4 73 |tr%,250,|m$)..B.s|
|00003a80| 74 72 69 6e 67 24 3d 22 | 50 6f 77 65 72 62 61 73 |tring$="|Powerbas|
|00003a90| 65 2c 49 6e 66 6f 72 6d | 61 74 69 6f 6e 21 22 2b |e,Inform|ation!"+|
|00003aa0| c3 28 6d 69 73 63 57 25 | 29 2b 22 2c 46 69 65 6c |.(miscW%|)+",Fiel|
|00003ab0| 64 3a 20 27 27 3e 22 2b | c3 28 6d 65 6e 75 25 28 |d: ''>"+|.(menu%(|
|00003ac0| 31 30 29 29 2b 22 2c 50 | 72 69 6e 74 3e 22 2b c3 |10))+",P|rint>"+.|
|00003ad0| 28 6d 65 6e 75 25 28 36 | 29 29 2b 22 2c 56 61 6c |(menu%(6|))+",Val|
|00003ae0| 69 64 61 74 69 6f 6e 3e | 22 2b c3 28 6d 65 6e 75 |idation>|"+.(menu|
|00003af0| 25 28 32 29 29 2b 22 2c | 43 75 72 72 65 6e 74 20 |%(2))+",|Current |
|00003b00| 6b 65 79 21 22 2b c3 28 | 6b 65 79 57 25 29 2b 22 |key!"+.(|keyW%)+"|
|00003b10| 2c 4d 69 73 63 65 6c 6c | 61 6e 65 6f 75 73 3e 22 |,Miscell|aneous>"|
|00003b20| 2b c3 28 6d 65 6e 75 25 | 28 37 29 29 2b 22 2c 53 |+.(menu%|(7))+",S|
|00003b30| 68 6f 77 20 6b 65 79 70 | 61 64 2c 45 78 70 6f 72 |how keyp|ad,Expor|
|00003b40| 74 20 73 75 62 73 65 74 | 21 22 2b c3 28 73 61 76 |t subset|!"+.(sav|
|00003b50| 65 73 75 62 57 25 29 2b | 22 2c 48 65 6c 70 22 0d |esubW%)+|",Help".|
|00003b60| 13 4c 30 6d 65 6e 75 25 | 28 31 29 3d a4 63 72 65 |.L0menu%|(1)=.cre|
|00003b70| 61 74 65 5f 6d 65 6e 75 | 28 6d 65 6e 75 5f 70 74 |ate_menu|(menu_pt|
|00003b80| 72 25 2c 32 32 30 2c 73 | 74 72 69 6e 67 24 29 0d |r%,220,s|tring$).|
|00003b90| 13 56 23 46 69 65 6c 64 | 70 6f 73 25 3d 6d 65 6e |.V#Field|pos%=men|
|00003ba0| 75 25 28 31 29 2b 32 38 | 2b 28 31 2a 32 34 29 2b |u%(1)+28|+(1*24)+|
|00003bb0| 31 32 0d 13 60 4a 6d 65 | 6e 75 25 28 34 29 3d a4 |12..`Jme|nu%(4)=.|
|00003bc0| 63 72 65 61 74 65 5f 6d | 65 6e 75 28 6d 65 6e 75 |create_m|enu(menu|
|00003bd0| 5f 70 74 72 25 2c 32 30 | 30 2c 22 50 72 69 6e 74 |_ptr%,20|0,"Print|
|00003be0| 20 74 72 65 65 2c 43 6f | 6d 70 6c 65 74 65 2c 54 | tree,Co|mplete,T|
|00003bf0| 6f 74 61 6c 73 20 6f 6e | 6c 79 22 29 0d 13 6a c7 |otals on|ly")..j.|
|00003c00| 6d 65 6e 75 25 28 33 29 | 3d a4 63 72 65 61 74 65 |menu%(3)|=.create|
|00003c10| 5f 6d 65 6e 75 28 6d 65 | 6e 75 5f 70 74 72 25 2c |_menu(me|nu_ptr%,|
|00003c20| 32 39 30 2c 22 55 74 69 | 6c 69 74 69 65 73 2c 4e |290,"Uti|lities,N|
|00003c30| 65 77 20 70 72 69 6d 61 | 72 79 20 6b 65 79 21 22 |ew prima|ry key!"|
|00003c40| 2b c3 28 6b 65 79 57 25 | 29 2b 22 2c 41 64 6a 75 |+.(keyW%|)+",Adju|
|00003c50| 73 74 20 66 6f 72 6d 61 | 74 2c 4e 65 77 20 72 65 |st forma|t,New re|
|00003c60| 63 6f 72 64 20 66 6f 72 | 6d 61 74 2c 4d 65 72 67 |cord for|mat,Merg|
|00003c70| 65 20 64 61 74 61 62 61 | 73 65 2c 7e 43 68 61 6e |e databa|se,~Chan|
|00003c80| 67 65 20 6c 65 6e 67 74 | 68 3e 22 2b c3 28 6d 65 |ge lengt|h>"+.(me|
|00003c90| 6e 75 25 28 31 31 29 29 | 2b 22 2c 42 61 6c 61 6e |nu%(11))|+",Balan|
|00003ca0| 63 65 20 69 6e 64 65 78 | 2c 50 72 69 6e 74 20 69 |ce index|,Print i|
|00003cb0| 6e 64 65 78 3e 22 2b c3 | 28 6d 65 6e 75 25 28 34 |ndex>"+.|(menu%(4|
|00003cc0| 29 29 29 0d 13 74 a1 6d | 65 6e 75 25 28 30 29 3d |)))..t.m|enu%(0)=|
|00003cd0| a4 63 72 65 61 74 65 5f | 6d 65 6e 75 28 6d 65 6e |.create_|menu(men|
|00003ce0| 75 5f 70 74 72 25 2c 32 | 35 30 2c 22 50 6f 77 65 |u_ptr%,2|50,"Powe|
|00003cf0| 72 62 61 73 65 2c 49 6e | 66 6f 72 6d 61 74 69 6f |rbase,In|formatio|
|00003d00| 6e 3e 22 2b c3 28 69 6e | 66 6f 57 25 29 2b 22 2c |n>"+.(in|foW%)+",|
|00003d10| 4e 65 77 20 64 61 74 61 | 62 61 73 65 3e 22 2b c3 |New data|base>"+.|
|00003d20| 28 73 61 76 65 61 70 70 | 57 25 29 2b 22 2c 7e 55 |(saveapp|W%)+",~U|
|00003d30| 74 69 6c 69 74 69 65 73 | 3e 22 2b c3 28 6d 65 6e |tilities|>"+.(men|
|00003d40| 75 25 28 33 29 29 2b 22 | 2c 7e 43 6c 6f 73 65 20 |u%(3))+"|,~Close |
|00003d50| 64 61 74 61 62 61 73 65 | 2c 48 65 6c 70 2c 51 75 |database|,Help,Qu|
|00003d60| 69 74 22 29 0d 13 7e c1 | 6d 65 6e 75 25 28 39 29 |it")..~.|menu%(9)|
|00003d70| 3d a4 63 72 65 61 74 65 | 5f 6d 65 6e 75 28 6d 65 |=.create|_menu(me|
|00003d80| 6e 75 5f 70 74 72 25 2c | 32 37 30 2c 22 4e 65 77 |nu_ptr%,|270,"New|
|00003d90| 20 64 61 74 61 62 61 73 | 65 2c 44 61 74 61 20 66 | databas|e,Data f|
|00003da0| 69 65 6c 64 3e 22 2b c3 | 28 63 72 65 61 74 65 57 |ield>"+.|(createW|
|00003db0| 25 29 2b 22 2c 7e 5f 44 | 65 66 61 75 6c 74 20 64 |%)+",~_D|efault d|
|00003dc0| 61 74 61 62 61 73 65 2c | 7e 53 61 76 65 20 66 6f |atabase,|~Save fo|
|00003dd0| 72 6d 20 66 69 6c 65 2c | 7e 44 61 74 61 62 61 73 |rm file,|~Databas|
|00003de0| 65 20 73 69 7a 65 3e 22 | 2b c3 28 6d 65 6e 75 25 |e size>"|+.(menu%|
|00003df0| 28 31 31 29 29 2b 22 2c | 7e 50 72 69 6d 61 72 79 |(11))+",|~Primary|
|00003e00| 20 6b 65 79 21 22 2b c3 | 28 6b 65 79 57 25 29 2b | key!"+.|(keyW%)+|
|00003e10| 22 2c 48 65 6c 70 2c 7e | 51 75 69 74 20 64 65 73 |",Help,~|Quit des|
|00003e20| 69 67 6e 22 29 0d 13 88 | 64 6d 65 6e 75 25 28 31 |ign")...|dmenu%(1|
|00003e30| 34 29 3d a4 63 72 65 61 | 74 65 5f 6d 65 6e 75 28 |4)=.crea|te_menu(|
|00003e40| 6d 65 6e 75 5f 70 74 72 | 25 2c 31 37 30 2c 22 53 |menu_ptr|%,170,"S|
|00003e50| 61 76 65 20 6c 69 73 74 | 2c 46 6f 72 6d 61 74 74 |ave list|,Formatt|
|00003e60| 65 64 3e 22 2b c3 73 61 | 76 65 57 25 2b 22 2c 44 |ed>"+.sa|veW%+",D|
|00003e70| 65 6c 69 6d 69 74 65 64 | 21 22 2b c3 28 73 61 76 |elimited|!"+.(sav|
|00003e80| 65 5f 63 73 76 57 25 29 | 29 0d 13 92 48 6d 65 6e |e_csvW%)|)...Hmen|
|00003e90| 75 25 28 31 37 29 3d a4 | 63 72 65 61 74 65 5f 6d |u%(17)=.|create_m|
|00003ea0| 65 6e 75 28 6d 65 6e 75 | 5f 70 74 72 25 2c 31 35 |enu(menu|_ptr%,15|
|00003eb0| 30 2c 22 54 61 62 6c 65 | 2c 44 65 6c 65 74 65 2c |0,"Table|,Delete,|
|00003ec0| 53 61 76 65 2c 50 72 69 | 6e 74 2c 53 6f 72 74 22 |Save,Pri|nt,Sort"|
|00003ed0| 29 0d 13 9c 51 6d 65 6e | 75 25 28 31 38 29 3d a4 |)...Qmen|u%(18)=.|
|00003ee0| 63 72 65 61 74 65 5f 6d | 65 6e 75 28 6d 65 6e 75 |create_m|enu(menu|
|00003ef0| 5f 70 74 72 25 2c 31 35 | 30 2c 22 4c 69 73 74 2c |_ptr%,15|0,"List,|
|00003f00| 53 61 76 65 3e 22 2b c3 | 28 6d 65 6e 75 25 28 31 |Save>"+.|(menu%(1|
|00003f10| 34 29 29 2b 22 2c 53 6f | 72 74 2c 53 63 72 61 70 |4))+",So|rt,Scrap|
|00003f20| 22 29 0d 13 a6 11 79 62 | 61 72 25 3d 39 36 2b 36 |")....yb|ar%=96+6|
|00003f30| 2a 34 34 0d 13 b0 05 e1 | 0d 13 ba 05 3a 0d 13 c4 |*44.....|....:...|
|00003f40| 28 dd 20 a4 63 72 65 61 | 74 65 5f 6d 65 6e 75 28 |(. .crea|te_menu(|
|00003f50| f8 20 6d 65 6e 75 25 2c | 77 69 64 74 68 25 2c 6c |. menu%,|width%,l|
|00003f60| 69 73 74 24 29 0d 13 ce | 34 ea 20 73 74 61 72 74 |ist$)...|4. start|
|00003f70| 25 2c 63 68 6f 69 63 65 | 24 2c 65 6e 74 72 69 65 |%,choice|$,entrie|
|00003f80| 73 25 2c 69 74 65 6d 25 | 2c 50 25 2c 51 25 2c 53 |s%,item%|,P%,Q%,S|
|00003f90| 25 2c 73 68 61 64 65 64 | 25 0d 13 d8 10 73 74 61 |%,shaded|%....sta|
|00003fa0| 72 74 25 3d 6d 65 6e 75 | 25 0d 13 e2 12 50 25 3d |rt%=menu|%....P%=|
|00003fb0| a7 6c 69 73 74 24 2c 22 | 2c 22 29 0d 13 ec 17 24 |.list$,"|,")....$|
|00003fc0| 6d 65 6e 75 25 3d c0 6c | 69 73 74 24 2c 50 25 2d |menu%=.l|ist$,P%-|
|00003fd0| 31 29 0d 13 f6 19 6d 65 | 6e 75 25 3f 31 32 3d 37 |1)....me|nu%?12=7|
|00003fe0| 3a 6d 65 6e 75 25 3f 31 | 33 3d 32 0d 14 00 19 6d |:menu%?1|3=2....m|
|00003ff0| 65 6e 75 25 3f 31 34 3d | 37 3a 6d 65 6e 75 25 3f |enu%?14=|7:menu%?|
|00004000| 31 35 3d 30 0d 14 0a 2a | 6d 65 6e 75 25 21 31 36 |15=0...*|menu%!16|
|00004010| 3d 77 69 64 74 68 25 3a | 6d 65 6e 75 25 21 32 30 |=width%:|menu%!20|
|00004020| 3d 34 34 3a 6d 65 6e 75 | 25 21 32 34 3d 30 0d 14 |=44:menu|%!24=0..|
|00004030| 14 12 69 74 65 6d 25 3d | 6d 65 6e 75 25 2b 32 38 |..item%=|menu%+28|
|00004040| 0d 14 1e 0e 6c 69 73 74 | 24 2b 3d 22 2c 22 0d 14 |....list|$+=","..|
|00004050| 28 0e 65 6e 74 72 69 65 | 73 25 3d 30 0d 14 32 05 |(.entrie|s%=0..2.|
|00004060| f5 0d 14 3c 0b 51 25 3d | 50 25 2b 31 0d 14 46 15 |...<.Q%=|P%+1..F.|
|00004070| 50 25 3d a7 6c 69 73 74 | 24 2c 22 2c 22 2c 51 25 |P%=.list|$,",",Q%|
|00004080| 29 0d 14 50 0c e7 20 50 | 25 3e 30 20 8c 0d 14 5a |)..P.. P|%>0 ...Z|
|00004090| 16 21 69 74 65 6d 25 3d | 30 3a 73 68 61 64 65 64 |.!item%=|0:shaded|
|000040a0| 25 3d 30 0d 14 64 1c 63 | 68 6f 69 63 65 24 3d c1 |%=0..d.c|hoice$=.|
|000040b0| 6c 69 73 74 24 2c 51 25 | 2c 50 25 2d 51 25 29 0d |list$,Q%|,P%-Q%).|
|000040c0| 14 6e 3b e7 20 c0 63 68 | 6f 69 63 65 24 2c 31 29 |.n;. .ch|oice$,1)|
|000040d0| 3d 22 7e 22 20 8c 20 63 | 68 6f 69 63 65 24 3d c1 |="~" . c|hoice$=.|
|000040e0| 63 68 6f 69 63 65 24 2c | 32 29 3a 73 68 61 64 65 |choice$,|2):shade|
|000040f0| 64 25 3d 28 31 3c 3c 32 | 32 29 0d 14 78 3d e7 20 |d%=(1<<2|2)..x=. |
|00004100| c0 63 68 6f 69 63 65 24 | 2c 31 29 3d 22 5f 22 20 |.choice$|,1)="_" |
|00004110| 8c 20 63 68 6f 69 63 65 | 24 3d c1 63 68 6f 69 63 |. choice|$=.choic|
|00004120| 65 24 2c 32 29 3a 3f 69 | 74 65 6d 25 3d 3f 69 74 |e$,2):?i|tem%=?it|
|00004130| 65 6d 25 20 84 20 32 0d | 14 82 14 53 25 3d a7 63 |em% . 2.|...S%=.c|
|00004140| 68 6f 69 63 65 24 2c 22 | 21 22 29 0d 14 8c 31 e7 |hoice$,"|!")...1.|
|00004150| 20 53 25 3e 30 20 8c 20 | 3f 69 74 65 6d 25 3d 3f | S%>0 . |?item%=?|
|00004160| 69 74 65 6d 25 20 84 20 | 38 3a c1 63 68 6f 69 63 |item% . |8:.choic|
|00004170| 65 24 2c 53 25 2c 31 29 | 3d 22 3e 22 0d 14 96 14 |e$,S%,1)|=">"....|
|00004180| 53 25 3d a7 63 68 6f 69 | 63 65 24 2c 22 3e 22 29 |S%=.choi|ce$,">")|
|00004190| 0d 14 a0 0c e7 20 53 25 | 3d 30 20 8c 0d 14 aa 0e |..... S%|=0 .....|
|000041a0| 69 74 65 6d 25 21 34 3d | 2d 31 0d 14 b4 05 cc 0d |item%!4=|-1......|
|000041b0| 14 be 1d 69 74 65 6d 25 | 21 34 3d bb 28 c1 63 68 |...item%|!4=.(.ch|
|000041c0| 6f 69 63 65 24 2c 53 25 | 2b 31 29 29 0d 14 c8 1a |oice$,S%|+1))....|
|000041d0| 63 68 6f 69 63 65 24 3d | c0 63 68 6f 69 63 65 24 |choice$=|.choice$|
|000041e0| 2c 53 25 2d 31 29 0d 14 | d2 05 cd 0d 14 dc 16 e7 |,S%-1)..|........|
|000041f0| 20 a9 28 63 68 6f 69 63 | 65 24 29 3c 3d 31 32 20 | .(choic|e$)<=12 |
|00004200| 8c 0d 14 e6 17 24 28 69 | 74 65 6d 25 2b 31 32 29 |.....$(i|tem%+12)|
|00004210| 3d 63 68 6f 69 63 65 24 | 0d 14 f0 14 69 74 65 6d |=choice$|....item|
|00004220| 25 21 38 3d 26 37 30 30 | 30 30 32 31 0d 14 fa 05 |%!8=&700|0021....|
|00004230| cc 0d 15 04 13 4c 25 3d | a9 28 63 68 6f 69 63 65 |.....L%=|.(choice|
|00004240| 24 29 2b 31 0d 15 0e 43 | 69 74 65 6d 25 21 31 32 |$)+1...C|item%!12|
|00004250| 3d 62 75 66 66 25 3a 24 | 62 75 66 66 25 3d 63 68 |=buff%:$|buff%=ch|
|00004260| 6f 69 63 65 24 3a 62 75 | 66 66 25 2b 3d 4c 25 3a |oice$:bu|ff%+=L%:|
|00004270| 69 74 65 6d 25 21 31 36 | 3d 2d 31 3a 69 74 65 6d |item%!16|=-1:item|
|00004280| 25 21 32 30 3d 4c 25 0d | 15 18 14 69 74 65 6d 25 |%!20=L%.|...item%|
|00004290| 21 38 3d 26 37 30 30 30 | 31 32 31 0d 15 22 05 cd |!8=&7000|121.."..|
|000042a0| 0d 15 2c 1d 69 74 65 6d | 25 21 38 3d 69 74 65 6d |..,.item|%!8=item|
|000042b0| 25 21 38 20 84 20 73 68 | 61 64 65 64 25 0d 15 36 |%!8 . sh|aded%..6|
|000042c0| 0d 69 74 65 6d 25 2b 3d | 32 34 0d 15 40 0f 65 6e |.item%+=|24..@.en|
|000042d0| 74 72 69 65 73 25 2b 3d | 31 0d 15 4a 05 cd 0d 15 |tries%+=|1..J....|
|000042e0| 54 0a fd 20 50 25 3d 30 | 0d 15 5e 1d 69 74 65 6d |T.. P%=0|..^.item|
|000042f0| 25 21 2d 32 34 3d 69 74 | 65 6d 25 21 2d 32 34 20 |%!-24=it|em%!-24 |
|00004300| 84 20 26 38 30 0d 15 68 | 0f 6d 65 6e 75 25 3d 69 |. &80..h|.menu%=i|
|00004310| 74 65 6d 25 0d 15 72 51 | e7 20 6d 65 6e 75 25 3e |tem%..rQ|. menu%>|
|00004320| 6d 65 6e 5f 65 6e 64 25 | 20 8c 20 85 20 a2 20 30 |men_end%| . . . 0|
|00004330| 2c 22 4e 6f 74 20 65 6e | 6f 75 67 68 20 72 6f 6f |,"Not en|ough roo|
|00004340| 6d 20 66 6f 72 20 6d 65 | 6e 75 73 20 28 69 6e 74 |m for me|nus (int|
|00004350| 65 72 6e 61 6c 20 65 72 | 72 6f 72 20 63 6f 64 65 |ernal er|ror code|
|00004360| 20 35 30 29 22 0d 15 7c | 0b 3d 73 74 61 72 74 25 | 50)"..||.=start%|
|00004370| 0d 15 86 05 3a 0d 15 90 | 1c dd 20 f2 74 69 63 6b |....:...|.. .tick|
|00004380| 28 6d 65 6e 75 25 2c 69 | 74 65 6d 25 2c 6f 6e 25 |(menu%,i|tem%,on%|
|00004390| 29 0d 15 9a 1b 69 74 65 | 6d 25 3d 6d 65 6e 75 25 |)....ite|m%=menu%|
|000043a0| 2b 32 38 2b 69 74 65 6d | 25 2a 32 34 0d 15 a4 0c |+28+item|%*24....|
|000043b0| c8 8e 20 6f 6e 25 20 ca | 0d 15 ae 19 c9 20 b9 3a |.. on% .|..... .:|
|000043c0| 3f 69 74 65 6d 25 3d 3f | 69 74 65 6d 25 20 84 20 |?item%=?|item% . |
|000043d0| 31 0d 15 b8 1b c9 20 a3 | 3a 3f 69 74 65 6d 25 3d |1..... .|:?item%=|
|000043e0| 3f 69 74 65 6d 25 20 80 | 20 32 35 34 0d 15 c2 05 |?item% .| 254....|
|000043f0| cb 0d 15 cc 05 e1 0d 15 | d6 05 3a 0d 15 e0 22 dd |........|..:...".|
|00004400| 20 f2 74 69 63 6b 5f 6f | 6e 65 28 6d 65 6e 75 25 | .tick_o|ne(menu%|
|00004410| 2c 6c 61 73 74 25 2c 69 | 74 65 6d 25 29 0d 15 ea |,last%,i|tem%)...|
|00004420| 08 ea 20 49 25 0d 15 f4 | 12 e3 20 49 25 3d 30 20 |.. I%...|.. I%=0 |
|00004430| b8 20 6c 61 73 74 25 0d | 15 fe 1e f2 74 69 63 6b |. last%.|....tick|
|00004440| 28 6d 65 6e 75 25 2c 49 | 25 2c 28 49 25 3d 69 74 |(menu%,I|%,(I%=it|
|00004450| 65 6d 25 29 29 0d 16 08 | 08 ed 20 49 25 0d 16 12 |em%))...|.. I%...|
|00004460| 05 e1 0d 16 1c 05 3a 0d | 16 26 1a dd 20 a4 74 69 |......:.|.&.. .ti|
|00004470| 63 6b 65 64 28 6d 65 6e | 75 25 2c 69 74 65 6d 25 |cked(men|u%,item%|
|00004480| 29 0d 16 30 1b 69 74 65 | 6d 25 3d 6d 65 6e 75 25 |)..0.ite|m%=menu%|
|00004490| 2b 32 38 2b 69 74 65 6d | 25 2a 32 34 0d 16 3a 1a |+28+item|%*24..:.|
|000044a0| e7 20 28 3f 69 74 65 6d | 25 20 80 20 31 29 20 8c |. (?item|% . 1) .|
|000044b0| 3d b9 20 8b 3d a3 0d 16 | 44 05 3a 0d 16 4e 1b dd |=. .=...|D.:..N..|
|000044c0| 20 f2 6c 69 74 28 6d 65 | 6e 75 25 2c 69 74 65 6d | .lit(me|nu%,item|
|000044d0| 25 2c 6f 6e 25 29 0d 16 | 58 1b 69 74 65 6d 25 3d |%,on%)..|X.item%=|
|000044e0| 6d 65 6e 75 25 2b 32 38 | 2b 69 74 65 6d 25 2a 32 |menu%+28|+item%*2|
|000044f0| 34 0d 16 62 0c c8 8e 20 | 6f 6e 25 20 ca 0d 16 6c |4..b... |on% ...l|
|00004500| 24 c9 20 b9 3a 20 69 74 | 65 6d 25 21 38 3d 69 74 |$. .: it|em%!8=it|
|00004510| 65 6d 25 21 38 20 80 20 | ac 20 28 31 3c 3c 32 32 |em%!8 . |. (1<<22|
|00004520| 29 0d 16 76 22 c9 20 a3 | 3a 20 69 74 65 6d 25 21 |)..v". .|: item%!|
|00004530| 38 3d 69 74 65 6d 25 21 | 38 20 84 20 28 31 3c 3c |8=item%!|8 . (1<<|
|00004540| 32 32 29 0d 16 80 05 cb | 0d 16 8a 05 e1 0d 16 94 |22).....|........|
|00004550| 05 3a 0d 16 9e 1d dd 20 | f2 73 68 6f 77 5f 6d 65 |.:..... |.show_me|
|00004560| 6e 75 28 6d 65 6e 75 25 | 2c 78 25 2c 79 25 29 0d |nu(menu%|,x%,y%).|
|00004570| 16 a8 29 6d 65 6e 75 68 | 61 6e 64 6c 65 25 3d 6d |..)menuh|andle%=m|
|00004580| 65 6e 75 25 3a 6d 65 6e | 75 78 25 3d 78 25 3a 6d |enu%:men|ux%=x%:m|
|00004590| 65 6e 75 79 25 3d 79 25 | 0d 16 b2 25 c8 99 20 22 |enuy%=y%|...%.. "|
|000045a0| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|000045b0| 2c 2c 6d 65 6e 75 25 2c | 78 25 2c 79 25 0d 16 bc |,,menu%,|x%,y%...|
|000045c0| 05 e1 0d 16 c6 05 3a 0d | 16 d0 05 3a 0d 16 da 4b |......:.|...:...K|
|000045d0| f4 20 49 63 6f 6e 20 68 | 61 6e 64 6c 69 6e 67 20 |. Icon h|andling |
|000045e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004600| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004610| 2d 2d 2d 2d 2d 2d 2d 0d | 16 e4 05 3a 0d 16 ee 54 |-------.|...:...T|
|00004620| dd 20 a4 63 72 65 61 74 | 65 5f 69 63 6f 6e 28 77 |. .creat|e_icon(w|
|00004630| 68 61 6e 64 6c 65 25 2c | 78 6d 69 6e 25 2c 79 6d |handle%,|xmin%,ym|
|00004640| 69 6e 25 2c 77 69 64 74 | 68 25 2c 68 65 69 67 68 |in%,widt|h%,heigh|
|00004650| 74 25 2c 69 63 6f 6e 66 | 6c 61 67 73 25 2c 74 65 |t%,iconf|lags%,te|
|00004660| 78 74 24 2c 64 31 25 2c | 64 32 25 2c 64 33 25 29 |xt$,d1%,|d2%,d3%)|
|00004670| 0d 16 f8 0d ea 20 68 61 | 6e 64 6c 65 25 0d 17 02 |..... ha|ndle%...|
|00004680| 15 62 6c 6f 63 6b 25 21 | 30 3d 77 68 61 6e 64 6c |.block%!|0=whandl|
|00004690| 65 25 0d 17 0c 21 62 6c | 6f 63 6b 25 21 34 3d 78 |e%...!bl|ock%!4=x|
|000046a0| 6d 69 6e 25 3a 62 6c 6f | 63 6b 25 21 38 3d 79 6d |min%:blo|ck%!8=ym|
|000046b0| 69 6e 25 0d 17 16 32 62 | 6c 6f 63 6b 25 21 31 32 |in%...2b|lock%!12|
|000046c0| 3d 78 6d 69 6e 25 2b 77 | 69 64 74 68 25 3a 62 6c |=xmin%+w|idth%:bl|
|000046d0| 6f 63 6b 25 21 31 36 3d | 79 6d 69 6e 25 2b 68 65 |ock%!16=|ymin%+he|
|000046e0| 69 67 68 74 25 0d 17 20 | 18 62 6c 6f 63 6b 25 21 |ight%.. |.block%!|
|000046f0| 32 30 3d 69 63 6f 6e 66 | 6c 61 67 73 25 0d 17 2a |20=iconf|lags%..*|
|00004700| 0d e7 20 64 31 25 3d 30 | 20 8c 0d 17 34 16 24 28 |.. d1%=0| ...4.$(|
|00004710| 62 6c 6f 63 6b 25 2b 32 | 34 29 3d 74 65 78 74 24 |block%+2|4)=text$|
|00004720| 0d 17 3e 05 cc 0d 17 48 | 11 62 6c 6f 63 6b 25 21 |..>....H|.block%!|
|00004730| 32 34 3d 64 31 25 0d 17 | 52 11 62 6c 6f 63 6b 25 |24=d1%..|R.block%|
|00004740| 21 32 38 3d 64 32 25 0d | 17 5c 11 62 6c 6f 63 6b |!28=d2%.|.\.block|
|00004750| 25 21 33 32 3d 64 33 25 | 0d 17 66 05 cd 0d 17 70 |%!32=d3%|..f....p|
|00004760| 2a c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |*.. "Wim|p_Create|
|00004770| 49 63 6f 6e 22 2c 2c 62 | 6c 6f 63 6b 25 20 b8 20 |Icon",,b|lock% . |
|00004780| 68 61 6e 64 6c 65 25 0d | 17 7a 0c 3d 68 61 6e 64 |handle%.|.z.=hand|
|00004790| 6c 65 25 0d 17 84 05 3a | 0d 17 8e 1b dd 20 f2 72 |le%....:|..... .r|
|000047a0| 65 64 72 61 77 5f 69 63 | 6f 6e 28 77 69 25 2c 69 |edraw_ic|on(wi%,i|
|000047b0| 63 25 29 0d 17 98 0f 21 | 62 6c 6f 63 6b 25 3d 77 |c%)....!|block%=w|
|000047c0| 69 25 0d 17 a2 10 62 6c | 6f 63 6b 25 21 34 3d 69 |i%....bl|ock%!4=i|
|000047d0| 63 25 0d 17 ac 0e 62 6c | 6f 63 6b 25 21 38 3d 30 |c%....bl|ock%!8=0|
|000047e0| 0d 17 b6 0f 62 6c 6f 63 | 6b 25 21 31 32 3d 30 0d |....bloc|k%!12=0.|
|000047f0| 17 c0 22 c8 99 20 22 57 | 69 6d 70 5f 53 65 74 49 |..".. "W|imp_SetI|
|00004800| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |conState|",,block|
|00004810| 25 0d 17 ca 2a 62 6c 6f | 63 6b 25 21 38 3d 30 3a |%...*blo|ck%!8=0:|
|00004820| 62 6c 6f 63 6b 25 21 31 | 32 3d 77 69 25 3a 62 6c |block%!1|2=wi%:bl|
|00004830| 6f 63 6b 25 21 31 36 3d | 69 63 25 0d 17 d4 20 c8 |ock%!16=|ic%... .|
|00004840| 99 20 22 57 69 6d 70 5f | 42 6f 72 64 65 72 49 63 |. "Wimp_|BorderIc|
|00004850| 6f 6e 22 2c 2c 62 6c 6f | 63 6b 25 0d 17 de 05 e1 |on",,blo|ck%.....|
|00004860| 0d 17 e8 05 3a 0d 17 f2 | 21 dd 20 f2 69 63 6f 6e |....:...|!. .icon|
|00004870| 5f 62 69 74 28 62 69 74 | 25 2c 77 69 25 2c 69 63 |_bit(bit|%,wi%,ic|
|00004880| 25 2c 6f 6e 25 29 0d 17 | fc 0f 21 62 6c 6f 63 6b |%,on%)..|..!block|
|00004890| 25 3d 77 69 25 0d 18 06 | 10 62 6c 6f 63 6b 25 21 |%=wi%...|.block%!|
|000048a0| 34 3d 69 63 25 0d 18 10 | 0c c8 8e 20 6f 6e 25 20 |4=ic%...|... on% |
|000048b0| ca 0d 18 1a 24 c9 20 b9 | 3a 62 6c 6f 63 6b 25 21 |....$. .|:block%!|
|000048c0| 38 3d 30 3a 62 6c 6f 63 | 6b 25 21 31 32 3d 31 3c |8=0:bloc|k%!12=1<|
|000048d0| 3c 62 69 74 25 0d 18 24 | 2a c9 20 a3 3a 62 6c 6f |<bit%..$|*. .:blo|
|000048e0| 63 6b 25 21 38 3d 31 3c | 3c 62 69 74 25 3a 62 6c |ck%!8=1<|<bit%:bl|
|000048f0| 6f 63 6b 25 21 31 32 3d | 31 3c 3c 62 69 74 25 0d |ock%!12=|1<<bit%.|
|00004900| 18 2e 05 cb 0d 18 38 22 | c8 99 20 22 57 69 6d 70 |......8"|.. "Wimp|
|00004910| 5f 53 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_SetIcon|State",,|
|00004920| 62 6c 6f 63 6b 25 0d 18 | 42 05 e1 0d 18 4c 05 3a |block%..|B....L.:|
|00004930| 0d 18 56 16 dd 20 f2 73 | 65 6c 65 63 74 28 77 69 |..V.. .s|elect(wi|
|00004940| 25 2c 69 63 25 29 0d 18 | 60 0f 21 62 6c 6f 63 6b |%,ic%)..|`.!block|
|00004950| 25 3d 77 69 25 0d 18 6a | 10 62 6c 6f 63 6b 25 21 |%=wi%..j|.block%!|
|00004960| 34 3d 69 63 25 0d 18 74 | 12 62 6c 6f 63 6b 25 21 |4=ic%..t|.block%!|
|00004970| 38 3d 31 3c 3c 32 31 0d | 18 7e 13 62 6c 6f 63 6b |8=1<<21.|.~.block|
|00004980| 25 21 31 32 3d 31 3c 3c | 32 31 0d 18 88 22 c8 99 |%!12=1<<|21..."..|
|00004990| 20 22 57 69 6d 70 5f 53 | 65 74 49 63 6f 6e 53 74 | "Wimp_S|etIconSt|
|000049a0| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 0d 18 92 05 |ate",,bl|ock%....|
|000049b0| e1 0d 18 9c 05 3a 0d 18 | a6 18 dd 20 f2 64 65 73 |.....:..|... .des|
|000049c0| 65 6c 65 63 74 28 77 69 | 25 2c 69 63 25 29 0d 18 |elect(wi|%,ic%)..|
|000049d0| b0 0f 21 62 6c 6f 63 6b | 25 3d 77 69 25 0d 18 ba |..!block|%=wi%...|
|000049e0| 10 62 6c 6f 63 6b 25 21 | 34 3d 69 63 25 0d 18 c4 |.block%!|4=ic%...|
|000049f0| 0e 62 6c 6f 63 6b 25 21 | 38 3d 30 0d 18 ce 15 62 |.block%!|8=0....b|
|00004a00| 6c 6f 63 6b 25 21 31 32 | 3d 28 31 3c 3c 32 31 29 |lock%!12|=(1<<21)|
|00004a10| 0d 18 d8 22 c8 99 20 22 | 57 69 6d 70 5f 53 65 74 |...".. "|Wimp_Set|
|00004a20| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |IconStat|e",,bloc|
|00004a30| 6b 25 0d 18 e2 05 e1 0d | 18 ec 05 3a 0d 18 f6 16 |k%......|...:....|
|00004a40| dd 20 f2 69 6e 76 65 72 | 74 28 77 69 25 2c 69 63 |. .inver|t(wi%,ic|
|00004a50| 25 29 0d 19 00 40 e7 20 | a4 73 65 6c 65 63 74 65 |%)...@. |.selecte|
|00004a60| 64 28 77 69 25 2c 69 63 | 25 29 20 8c 20 f2 64 65 |d(wi%,ic|%) . .de|
|00004a70| 73 65 6c 65 63 74 28 77 | 69 25 2c 69 63 25 29 20 |select(w|i%,ic%) |
|00004a80| 8b 20 f2 73 65 6c 65 63 | 74 28 77 69 25 2c 69 63 |. .selec|t(wi%,ic|
|00004a90| 25 29 0d 19 0a 05 e1 0d | 19 14 05 3a 0d 19 1e 18 |%)......|...:....|
|00004aa0| dd 20 a4 73 65 6c 65 63 | 74 65 64 28 77 69 25 2c |. .selec|ted(wi%,|
|00004ab0| 69 63 25 29 0d 19 28 1c | 21 62 6c 6f 63 6b 25 3d |ic%)..(.|!block%=|
|00004ac0| 77 69 25 3a 62 6c 6f 63 | 6b 25 21 34 3d 69 63 25 |wi%:bloc|k%!4=ic%|
|00004ad0| 0d 19 32 22 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |..2".. "|Wimp_Get|
|00004ae0| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |IconStat|e",,bloc|
|00004af0| 6b 25 0d 19 3c 1e 3d 28 | 28 62 6c 6f 63 6b 25 21 |k%..<.=(|(block%!|
|00004b00| 32 34 29 20 80 20 28 31 | 3c 3c 32 31 29 29 3e 30 |24) . (1|<<21))>0|
|00004b10| 0d 19 46 05 3a 0d 19 50 | 1d dd 20 a4 73 65 6c 65 |..F.:..P|.. .sele|
|00004b20| 63 74 65 64 5f 65 73 67 | 28 77 69 25 2c 65 73 67 |cted_esg|(wi%,esg|
|00004b30| 25 29 0d 19 5a 41 c8 99 | 20 22 57 69 6d 70 5f 57 |%)..ZA..| "Wimp_W|
|00004b40| 68 69 63 68 49 63 6f 6e | 22 2c 77 69 25 2c 62 6c |hichIcon|",wi%,bl|
|00004b50| 6f 63 6b 25 2c 26 30 30 | 33 46 30 30 30 30 2c 26 |ock%,&00|3F0000,&|
|00004b60| 30 30 32 30 30 30 30 30 | 2b 28 65 73 67 25 3c 3c |00200000|+(esg%<<|
|00004b70| 31 36 29 0d 19 64 0c 3d | 21 62 6c 6f 63 6b 25 0d |16)..d.=|!block%.|
|00004b80| 19 6e 05 3a 0d 19 78 14 | dd 20 a4 74 65 78 74 28 |.n.:..x.|. .text(|
|00004b90| 77 69 25 2c 69 63 25 29 | 0d 19 82 1c 21 62 6c 6f |wi%,ic%)|....!blo|
|00004ba0| 63 6b 25 3d 77 69 25 3a | 62 6c 6f 63 6b 25 21 34 |ck%=wi%:|block%!4|
|00004bb0| 3d 69 63 25 0d 19 8c 22 | c8 99 20 22 57 69 6d 70 |=ic%..."|.. "Wimp|
|00004bc0| 5f 47 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_GetIcon|State",,|
|00004bd0| 62 6c 6f 63 6b 25 0d 19 | 96 0e 3d 62 6c 6f 63 6b |block%..|..=block|
|00004be0| 25 21 32 38 0d 19 a0 05 | 3a 0d 19 aa 1b dd 20 a4 |%!28....|:..... .|
|00004bf0| 74 65 78 74 5f 6c 65 6e | 67 74 68 28 77 69 25 2c |text_len|gth(wi%,|
|00004c00| 69 63 25 29 0d 19 b4 1c | 21 62 6c 6f 63 6b 25 3d |ic%)....|!block%=|
|00004c10| 77 69 25 3a 62 6c 6f 63 | 6b 25 21 34 3d 69 63 25 |wi%:bloc|k%!4=ic%|
|00004c20| 0d 19 be 22 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |...".. "|Wimp_Get|
|00004c30| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |IconStat|e",,bloc|
|00004c40| 6b 25 0d 19 c8 14 3d a9 | 28 24 28 62 6c 6f 63 6b |k%....=.|($(block|
|00004c50| 25 21 32 38 29 29 0d 19 | d2 05 3a 0d 19 dc 1d dd |%!28))..|..:.....|
|00004c60| 20 f2 73 65 74 5f 63 61 | 72 65 74 28 68 61 6e 64 | .set_ca|ret(hand|
|00004c70| 6c 65 25 2c 69 63 25 29 | 0d 19 e6 4b c8 99 20 22 |le%,ic%)|...K.. "|
|00004c80| 57 69 6d 70 5f 53 65 74 | 43 61 72 65 74 50 6f 73 |Wimp_Set|CaretPos|
|00004c90| 69 74 69 6f 6e 22 2c 68 | 61 6e 64 6c 65 25 2c 69 |ition",h|andle%,i|
|00004ca0| 63 25 2c 30 2c 30 2c 2d | 31 2c a4 74 65 78 74 5f |c%,0,0,-|1,.text_|
|00004cb0| 6c 65 6e 67 74 68 28 68 | 61 6e 64 6c 65 25 2c 69 |length(h|andle%,i|
|00004cc0| 63 25 29 0d 19 f0 05 e1 | 0d 19 fa 05 3a 0d 1a 04 |c%).....|....:...|
|00004cd0| 1d dd 20 f2 61 6c 74 65 | 72 5f 66 6c 61 67 73 28 |.. .alte|r_flags(|
|00004ce0| 64 66 67 25 2c 66 66 67 | 25 29 0d 1a 0e 09 ea 20 |dfg%,ffg|%)..... |
|00004cf0| 69 63 25 0d 1a 18 12 21 | 62 6c 6f 63 6b 25 3d 6d |ic%....!|block%=m|
|00004d00| 61 69 6e 57 25 0d 1a 22 | 19 e3 20 69 63 25 3d 30 |ainW%.."|.. ic%=0|
|00004d10| 20 b8 20 66 69 65 6c 64 | 73 25 2a 32 2d 31 0d 1a | . field|s%*2-1..|
|00004d20| 2c 2f 62 6c 6f 63 6b 25 | 21 34 3d 69 63 25 3a c8 |,/block%|!4=ic%:.|
|00004d30| 99 20 22 57 69 6d 70 5f | 47 65 74 49 63 6f 6e 53 |. "Wimp_|GetIconS|
|00004d40| 74 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 25 0d 1a 36 |tate",,b|lock%..6|
|00004d50| 31 e7 20 28 69 63 25 20 | 83 20 32 29 3d 30 20 8c |1. (ic% |. 2)=0 .|
|00004d60| 20 62 6c 6f 63 6b 25 21 | 38 3d 64 66 67 25 20 8b | block%!|8=dfg% .|
|00004d70| 20 62 6c 6f 63 6b 25 21 | 38 3d 66 66 67 25 0d 1a | block%!|8=ffg%..|
|00004d80| 40 17 62 6c 6f 63 6b 25 | 21 31 32 3d 26 46 46 46 |@.block%|!12=&FFF|
|00004d90| 46 46 46 46 46 0d 1a 4a | 22 c8 99 20 22 57 69 6d |FFFFF..J|".. "Wim|
|00004da0| 70 5f 53 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_SetIco|nState",|
|00004db0| 2c 62 6c 6f 63 6b 25 0d | 1a 54 09 ed 20 69 63 25 |,block%.|.T.. ic%|
|00004dc0| 0d 1a 5e 05 e1 0d 1a 68 | 05 3a 0d 1a 72 1a dd 20 |..^....h|.:..r.. |
|00004dd0| f2 6c 69 6d 69 74 5f 61 | 63 74 69 6f 6e 73 28 6f |.limit_a|ctions(o|
|00004de0| 66 66 25 29 0d 1a 7c 10 | e3 20 69 63 25 3d 37 20 |ff%)..|.|. ic%=7 |
|00004df0| b8 20 31 31 0d 1a 86 23 | f2 69 63 6f 6e 5f 62 69 |. 11...#|.icon_bi|
|00004e00| 74 28 32 32 2c 6b 65 79 | 70 61 64 57 25 2c 69 63 |t(22,key|padW%,ic|
|00004e10| 25 2c 6f 66 66 25 29 0d | 1a 90 09 ed 20 69 63 25 |%,off%).|.... ic%|
|00004e20| 0d 1a 9a 22 f2 69 63 6f | 6e 5f 62 69 74 28 32 32 |...".ico|n_bit(22|
|00004e30| 2c 6b 65 79 70 61 64 57 | 25 2c 32 33 2c 6f 66 66 |,keypadW|%,23,off|
|00004e40| 25 29 0d 1a a4 05 e1 0d | 1a ae 05 3a 0d 1a b8 05 |%)......|...:....|
|00004e50| 3a 0d 1a c2 05 3a 0d 1a | cc 1e dd 20 f2 69 64 65 |:....:..|... .ide|
|00004e60| 6e 74 69 66 79 5f 66 69 | 65 6c 64 28 77 69 25 2c |ntify_fi|eld(wi%,|
|00004e70| 69 63 25 29 0d 1a d6 2e | 46 69 65 6c 64 6e 75 6d |ic%)....|Fieldnum|
|00004e80| 62 65 72 25 3d 30 3a 46 | 69 65 6c 64 6e 61 6d 65 |ber%=0:F|ieldname|
|00004e90| 24 3d 22 22 3a 54 65 78 | 74 4c 65 6e 67 74 68 25 |$="":Tex|tLength%|
|00004ea0| 3d 30 0d 1a e0 20 e7 20 | 77 69 25 3d 6d 61 69 6e |=0... . |wi%=main|
|00004eb0| 57 25 20 80 20 28 69 63 | 25 20 83 20 32 29 3d 31 |W% . (ic|% . 2)=1|
|00004ec0| 20 8c 0d 1a ea 1c 21 62 | 6c 6f 63 6b 25 3d 77 69 | .....!b|lock%=wi|
|00004ed0| 25 3a 62 6c 6f 63 6b 25 | 21 34 3d 69 63 25 0d 1a |%:block%|!4=ic%..|
|00004ee0| f4 22 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 49 63 |.".. "Wi|mp_GetIc|
|00004ef0| 6f 6e 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 25 |onState"|,,block%|
|00004f00| 0d 1a fe 1b 54 65 78 74 | 4c 65 6e 67 74 68 25 3d |....Text|Length%=|
|00004f10| 62 6c 6f 63 6b 25 21 33 | 36 2d 31 0d 1b 08 1c 46 |block%!3|6-1....F|
|00004f20| 69 65 6c 64 6e 75 6d 62 | 65 72 25 3d 28 69 63 25 |ieldnumb|er%=(ic%|
|00004f30| 2b 31 29 20 81 20 32 0d | 1b 12 31 46 69 65 6c 64 |+1) . 2.|..1Field|
|00004f40| 6e 61 6d 65 24 3d 24 a4 | 74 65 78 74 28 6d 61 69 |name$=$.|text(mai|
|00004f50| 6e 57 25 2c 64 65 73 63 | 25 28 46 69 65 6c 64 6e |nW%,desc|%(Fieldn|
|00004f60| 75 6d 62 65 72 25 29 29 | 0d 1b 1c 33 e7 20 46 69 |umber%))|...3. Fi|
|00004f70| 65 6c 64 6e 61 6d 65 24 | 3d 22 22 20 8c 20 46 69 |eldname$|="" . Fi|
|00004f80| 65 6c 64 6e 61 6d 65 24 | 3d 54 61 67 24 28 46 69 |eldname$|=Tag$(Fi|
|00004f90| 65 6c 64 6e 75 6d 62 65 | 72 25 29 0d 1b 26 05 cd |eldnumbe|r%)..&..|
|00004fa0| 0d 1b 30 05 e1 0d 1b 3a | 05 3a 0d 1b 44 05 3a 0d |..0....:|.:..D.:.|
|00004fb0| 1b 4e 05 3a 0d 1b 58 12 | dd 20 a4 66 69 72 73 74 |.N.:..X.|. .first|
|00004fc0| 5f 66 69 65 6c 64 0d 1b | 62 08 ea 20 49 25 0d 1b |_field..|b.. I%..|
|00004fd0| 6c 11 c8 95 20 6c 65 6e | 25 28 49 25 29 3d 30 0d |l... len|%(I%)=0.|
|00004fe0| 1b 76 09 49 25 2b 3d 31 | 0d 1b 80 05 ce 0d 1b 8a |.v.I%+=1|........|
|00004ff0| 07 3d 49 25 0d 1b 94 05 | 3a 0d 1b 9e 05 3a 0d 1b |.=I%....|:....:..|
|00005000| a8 05 3a 0d 1b b2 4b f4 | 20 4d 6f 75 73 65 5f 63 |..:...K.| Mouse_c|
|00005010| 6c 69 63 6b 20 70 72 6f | 63 65 73 73 69 6e 67 20 |lick pro|cessing |
|00005020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 1b |--------|------..|
|00005050| bc 05 3a 0d 1b c6 0e dd | 20 f2 62 75 74 74 6f 6e |..:.....| .button|
|00005060| 73 0d 1b d0 16 ea 20 78 | 25 2c 79 25 2c 62 25 2c |s..... x|%,y%,b%,|
|00005070| 77 69 25 2c 69 63 25 0d | 1b da 20 c8 99 20 22 57 |wi%,ic%.|.. .. "W|
|00005080| 69 6d 70 5f 42 6f 72 64 | 65 72 49 63 6f 6e 22 2c |imp_Bord|erIcon",|
|00005090| 2c 62 6c 6f 63 6b 25 0d | 1b e4 17 78 25 3d 21 62 |,block%.|...x%=!b|
|000050a0| 6c 6f 63 6b 25 3a 6f 6c | 64 78 25 3d 78 25 0d 1b |lock%:ol|dx%=x%..|
|000050b0| ee 18 79 25 3d 62 6c 6f | 63 6b 25 21 34 3a 6f 6c |..y%=blo|ck%!4:ol|
|000050c0| 64 79 25 3d 79 25 0d 1b | f8 0f 62 25 3d 62 6c 6f |dy%=y%..|..b%=blo|
|000050d0| 63 6b 25 21 38 0d 1c 02 | 11 77 69 25 3d 62 6c 6f |ck%!8...|.wi%=blo|
|000050e0| 63 6b 25 21 31 32 0d 1c | 0c 11 69 63 25 3d 62 6c |ck%!12..|..ic%=bl|
|000050f0| 6f 63 6b 25 21 31 36 0d | 1c 16 0c c8 8e 20 77 69 |ock%!16.|..... wi|
|00005100| 25 20 ca 0d 1c 20 17 c9 | 20 2d 32 3a f2 69 63 6f |% ... ..| -2:.ico|
|00005110| 6e 62 61 72 5f 63 6c 69 | 63 6b 0d 1c 2a 18 c9 20 |nbar_cli|ck..*.. |
|00005120| 6d 61 69 6e 57 25 3a f2 | 6d 61 69 6e 5f 63 6c 69 |mainW%:.|main_cli|
|00005130| 63 6b 0d 1c 34 1c c9 20 | 6b 65 79 70 61 64 57 25 |ck..4.. |keypadW%|
|00005140| 3a f2 6b 65 79 70 61 64 | 5f 63 6c 69 63 6b 0d 1c |:.keypad|_click..|
|00005150| 3e 1c c9 20 6b 65 79 70 | 61 64 57 25 3a f2 6b 65 |>.. keyp|adW%:.ke|
|00005160| 79 70 61 64 5f 63 6c 69 | 63 6b 0d 1c 48 37 c9 20 |ypad_cli|ck..H7. |
|00005170| 73 61 76 65 57 25 2c 73 | 61 76 65 61 70 70 57 25 |saveW%,s|aveappW%|
|00005180| 2c 73 61 76 65 5f 63 73 | 76 57 25 2c 73 61 76 65 |,save_cs|vW%,save|
|00005190| 73 75 62 57 25 3a f2 73 | 61 76 65 5f 63 6c 69 63 |subW%:.s|ave_clic|
|000051a0| 6b 0d 1c 52 1c c9 20 73 | 65 61 72 63 68 57 25 3a |k..R.. s|earchW%:|
|000051b0| f2 73 65 61 72 63 68 5f | 63 6c 69 63 6b 0d 1c 5c |.search_|click..\|
|000051c0| 16 c9 20 6b 65 79 57 25 | 3a f2 6b 65 79 5f 63 6c |.. keyW%|:.key_cl|
|000051d0| 69 63 6b 0d 1c 66 1b c9 | 20 74 61 62 6c 65 57 25 |ick..f..| tableW%|
|000051e0| 3a f2 63 72 65 61 74 65 | 5f 74 61 62 6c 65 0d 1c |:.create|_table..|
|000051f0| 70 1b c9 20 6c 69 6e 6b | 57 25 3a f2 6c 69 6e 6b |p.. link|W%:.link|
|00005200| 5f 74 6f 5f 74 61 62 6c | 65 0d 1c 7a 27 c9 20 70 |_to_tabl|e..z'. p|
|00005210| 61 73 73 57 25 3a e7 20 | 28 62 25 20 80 20 25 31 |assW%:. |(b% . %1|
|00005220| 30 30 29 20 8c 20 f2 70 | 61 73 73 77 6f 72 64 73 |00) . .p|asswords|
|00005230| 0d 1c 84 1a c9 20 70 72 | 69 6e 74 57 25 3a f2 70 |..... pr|intW%:.p|
|00005240| 72 69 6e 74 5f 63 6c 69 | 63 6b 0d 1c 8e 26 c9 20 |rint_cli|ck...&. |
|00005250| 6d 61 74 63 68 57 25 3a | f2 6d 61 74 63 68 5f 63 |matchW%:|.match_c|
|00005260| 6c 69 63 6b 28 62 25 2c | 77 69 25 2c 69 63 25 29 |lick(b%,|wi%,ic%)|
|00005270| 0d 1c 98 1c c9 20 63 72 | 65 61 74 65 57 25 3a f2 |..... cr|eateW%:.|
|00005280| 63 72 65 61 74 65 5f 63 | 6c 69 63 6b 0d 1c a2 1e |create_c|lick....|
|00005290| c9 20 64 61 74 61 64 69 | 63 57 25 3a f2 64 61 74 |. datadi|cW%:.dat|
|000052a0| 61 64 69 63 5f 63 6c 69 | 63 6b 0d 1c ac 37 c9 20 |adic_cli|ck...7. |
|000052b0| 63 68 61 6e 67 65 57 25 | 3a e7 20 28 62 25 20 80 |changeW%|:. (b% .|
|000052c0| 20 25 31 31 31 29 3d 34 | 20 80 20 69 63 25 3d 34 | %111)=4| . ic%=4|
|000052d0| 20 8c 20 f2 63 68 61 6e | 67 65 73 28 6b 65 79 25 | . .chan|ges(key%|
|000052e0| 29 0d 1c b6 2d c9 20 6d | 6f 76 65 57 25 3a e7 20 |)...-. m|oveW%:. |
|000052f0| 28 62 25 20 80 20 25 31 | 31 31 29 3d 34 20 80 20 |(b% . %1|11)=4 . |
|00005300| 69 63 25 3d 38 20 8c 20 | f2 63 6c 65 61 72 0d 1c |ic%=8 . |.clear..|
|00005310| c0 0d c9 20 6c 69 73 74 | 57 25 3a 0d 1c ca 10 e7 |... list|W%:.....|
|00005320| 20 28 62 25 20 80 20 32 | 29 20 8c 0d 1c d4 25 f2 | (b% . 2|) ....%.|
|00005330| 73 68 6f 77 5f 6d 65 6e | 75 28 6d 65 6e 75 25 28 |show_men|u(menu%(|
|00005340| 31 38 29 2c 78 25 2d 36 | 34 2c 79 25 2d 32 30 29 |18),x%-6|4,y%-20)|
|00005350| 0d 1c de 2b 24 53 61 76 | 65 4c 69 73 74 25 3d 24 |...+$Sav|eList%=$|
|00005360| 64 61 74 61 62 61 73 65 | 25 2b 22 2e 50 72 69 6e |database|%+".Prin|
|00005370| 74 4a 6f 62 73 2e 4c 69 | 73 74 22 0d 1c e8 2d 24 |tJobs.Li|st"...-$|
|00005380| 53 61 76 65 43 53 56 25 | 3d 24 64 61 74 61 62 61 |SaveCSV%|=$databa|
|00005390| 73 65 25 2b 22 2e 50 72 | 69 6e 74 4a 6f 62 73 2e |se%+".Pr|intJobs.|
|000053a0| 44 65 6c 4c 69 73 74 22 | 0d 1c f2 05 cd 0d 1c fc |DelList"|........|
|000053b0| 18 c9 20 63 6f 6c 57 25 | 3a f2 73 65 74 5f 63 6f |.. colW%|:.set_co|
|000053c0| 6c 6f 75 72 73 0d 1d 06 | 26 c9 20 63 61 6c 63 57 |lours...|&. calcW|
|000053d0| 25 3a f2 63 61 6c 63 5f | 66 6f 72 6d 75 6c 61 28 |%:.calc_|formula(|
|000053e0| 24 43 61 6c 63 46 6f 72 | 6d 25 29 0d 1d 10 0e c9 |$CalcFor|m%).....|
|000053f0| 20 6c 61 62 65 6c 57 25 | 3a 0d 1d 1a 0c c8 8e 20 | labelW%|:...... |
|00005400| 69 63 25 20 ca 0d 1d 24 | 37 c9 20 31 31 3a f2 69 |ic% ...$|7. 11:.i|
|00005410| 63 6f 6e 5f 62 69 74 28 | 32 32 2c 6c 61 62 65 6c |con_bit(|22,label|
|00005420| 57 25 2c 31 32 2c a4 73 | 65 6c 65 63 74 65 64 28 |W%,12,.s|elected(|
|00005430| 6c 61 62 65 6c 57 25 2c | 31 31 29 29 0d 1d 2e 21 |labelW%,|11))...!|
|00005440| c9 20 31 35 3a c8 99 20 | 22 57 69 6d 70 5f 43 72 |. 15:.. |"Wimp_Cr|
|00005450| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 2d 31 0d 1d 38 |eateMenu|",,-1..8|
|00005460| 05 cb 0d 1d 42 05 cb 0d | 1d 4c 2a 62 6c 6f 63 6b |....B...|.L*block|
|00005470| 25 21 38 3d 30 3a 62 6c | 6f 63 6b 25 21 31 32 3d |%!8=0:bl|ock%!12=|
|00005480| 77 69 25 3a 62 6c 6f 63 | 6b 25 21 31 36 3d 69 63 |wi%:bloc|k%!16=ic|
|00005490| 25 0d 1d 56 20 c8 99 20 | 22 57 69 6d 70 5f 42 6f |%..V .. |"Wimp_Bo|
|000054a0| 72 64 65 72 49 63 6f 6e | 22 2c 2c 62 6c 6f 63 6b |rderIcon|",,block|
|000054b0| 25 0d 1d 60 05 e1 0d 1d | 6a 05 3a 0d 1d 74 14 dd |%..`....|j.:..t..|
|000054c0| 20 f2 64 61 74 61 64 69 | 63 5f 63 6c 69 63 6b 0d | .datadi|c_click.|
|000054d0| 1d 7e 12 c8 8e 20 62 25 | 20 80 20 25 31 31 31 20 |.~... b%| . %111 |
|000054e0| ca 0d 1d 88 08 c9 20 34 | 3a 0d 1d 92 36 21 62 6c |...... 4|:...6!bl|
|000054f0| 6f 63 6b 25 3d 64 61 74 | 61 64 69 63 57 25 3a c8 |ock%=dat|adicW%:.|
|00005500| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|00005510| 77 53 74 61 74 65 22 2c | 2c 62 6c 6f 63 6b 25 0d |wState",|,block%.|
|00005520| 1d 9c 57 e7 20 41 63 63 | 65 73 73 25 20 8c 20 c8 |..W. Acc|ess% . .|
|00005530| 99 20 22 57 69 6d 70 5f | 53 65 74 43 61 72 65 74 |. "Wimp_|SetCaret|
|00005540| 50 6f 73 69 74 69 6f 6e | 22 2c 64 61 74 61 64 69 |Position|",datadi|
|00005550| 63 57 25 2c 69 63 25 2c | 78 25 2d 62 6c 6f 63 6b |cW%,ic%,|x%-block|
|00005560| 25 21 34 2b 62 6c 6f 63 | 6b 25 21 32 30 2c 79 25 |%!4+bloc|k%!20,y%|
|00005570| 2c 2d 31 2c 2d 31 0d 1d | a6 29 c9 20 32 3a f2 73 |,-1,-1..|.). 2:.s|
|00005580| 68 6f 77 5f 6d 65 6e 75 | 28 6d 65 6e 75 25 28 31 |how_menu|(menu%(1|
|00005590| 37 29 2c 78 25 2d 36 34 | 2c 79 25 2d 32 30 29 0d |7),x%-64|,y%-20).|
|000055a0| 1d b0 08 c9 20 31 3a 0d | 1d ba 0e e7 20 69 63 25 |.... 1:.|.... ic%|
|000055b0| 3e 3d 30 20 8c 0d 1d c4 | 21 66 69 65 6c 64 25 3d |>=0 ....|!field%=|
|000055c0| 28 69 63 25 20 83 20 28 | 54 61 62 46 69 65 6c 64 |(ic% . (|TabField|
|000055d0| 73 25 2b 31 29 29 0d 1d | ce 17 f2 69 6e 76 65 72 |s%+1))..|...inver|
|000055e0| 74 28 77 69 25 2c 66 69 | 65 6c 64 25 29 0d 1d d8 |t(wi%,fi|eld%)...|
|000055f0| 14 66 69 65 6c 64 24 3d | c3 28 66 69 65 6c 64 25 |.field$=|.(field%|
|00005600| 29 0d 1d e2 1d e7 20 a4 | 73 65 6c 65 63 74 65 64 |)..... .|selected|
|00005610| 28 77 69 25 2c 66 69 65 | 6c 64 25 29 20 8c 0d 1d |(wi%,fie|ld%) ...|
|00005620| ec 23 70 72 69 6e 74 72 | 65 6c 24 28 54 61 62 6c |.#printr|el$(Tabl|
|00005630| 65 6e 75 6d 62 65 72 25 | 29 2b 3d 66 69 65 6c 64 |enumber%|)+=field|
|00005640| 24 0d 1d f6 05 cc 0d 1e | 00 27 50 25 3d a7 70 72 |$.......|.'P%=.pr|
|00005650| 69 6e 74 72 65 6c 24 28 | 54 61 62 6c 65 6e 75 6d |intrel$(|Tablenum|
|00005660| 62 65 72 25 29 2c 66 69 | 65 6c 64 24 29 0d 1e 0a |ber%),fi|eld$)...|
|00005670| 59 70 72 69 6e 74 72 65 | 6c 24 28 54 61 62 6c 65 |Yprintre|l$(Table|
|00005680| 6e 75 6d 62 65 72 25 29 | 3d c0 70 72 69 6e 74 72 |number%)|=.printr|
|00005690| 65 6c 24 28 54 61 62 6c | 65 6e 75 6d 62 65 72 25 |el$(Tabl|enumber%|
|000056a0| 29 2c 50 25 2d 31 29 2b | c1 70 72 69 6e 74 72 65 |),P%-1)+|.printre|
|000056b0| 6c 24 28 54 61 62 6c 65 | 6e 75 6d 62 65 72 25 29 |l$(Table|number%)|
|000056c0| 2c 50 25 2b 31 29 0d 1e | 14 05 cd 0d 1e 1e 05 cd |,P%+1)..|........|
|000056d0| 0d 1e 28 05 cb 0d 1e 32 | 05 e1 0d 1e 3c 05 3a 0d |..(....2|....<.:.|
|000056e0| 1e 46 1e dd 20 f2 6d 61 | 74 63 68 5f 63 6c 69 63 |.F.. .ma|tch_clic|
|000056f0| 6b 28 62 25 2c 77 69 25 | 2c 69 63 25 29 0d 1e 50 |k(b%,wi%|,ic%)..P|
|00005700| 13 ea 20 6e 6f 74 25 2c | 61 6e 64 25 2c 6f 72 25 |.. not%,|and%,or%|
|00005710| 0d 1e 5a 2f e7 20 62 25 | 3d 32 20 8c 20 f2 73 68 |..Z/. b%|=2 . .sh|
|00005720| 6f 77 5f 6d 65 6e 75 28 | 6d 65 6e 75 25 28 31 29 |ow_menu(|menu%(1)|
|00005730| 2c 78 25 2d 36 34 2c 79 | 25 2d 32 30 29 3a e1 0d |,x%-64,y|%-20):..|
|00005740| 1e 64 0c c8 8e 20 69 63 | 25 20 ca 0d 1e 6e 08 c9 |.d... ic|% ...n..|
|00005750| 20 31 3a 0d 1e 78 25 53 | 65 61 72 63 68 24 3d a4 | 1:..x%S|earch$=.|
|00005760| 70 61 72 73 65 28 24 a4 | 74 65 78 74 28 6d 61 74 |parse($.|text(mat|
|00005770| 63 68 57 25 2c 30 29 29 | 0d 1e 82 18 e7 20 53 65 |chW%,0))|..... Se|
|00005780| 61 72 63 68 24 3c 3e 22 | 46 41 4c 53 45 22 20 8c |arch$<>"|FALSE" .|
|00005790| 0d 1e 8c 0c e7 20 62 25 | 3d 34 20 8c 0d 1e 96 19 |..... b%|=4 .....|
|000057a0| 24 a4 74 65 78 74 28 6d | 61 74 63 68 57 25 2c 31 |$.text(m|atchW%,1|
|000057b0| 34 29 3d 22 22 0d 1e a0 | 1c f2 72 65 64 72 61 77 |4)=""...|..redraw|
|000057c0| 5f 69 63 6f 6e 28 6d 61 | 74 63 68 57 25 2c 31 34 |_icon(ma|tchW%,14|
|000057d0| 29 0d 1e aa 13 c8 8e 20 | 6d 61 74 63 68 66 75 6e |)...... |matchfun|
|000057e0| 63 25 20 ca 0d 1e b4 17 | c9 20 31 3a f2 64 6f 5f |c% .....|. 1:.do_|
|000057f0| 69 74 28 53 65 61 72 63 | 68 24 29 0d 1e be 20 c9 |it(Searc|h$)... .|
|00005800| 20 32 3a 61 64 64 72 3d | a4 6d 6f 76 65 74 6f 28 | 2:addr=|.moveto(|
|00005810| 6b 65 79 25 2c 74 6f 70 | 2c 31 29 0d 1e c8 05 cb |key%,top|,1).....|
|00005820| 0d 1e d2 05 cd 0d 1e dc | 05 cd 0d 1e e6 08 c9 20 |........|....... |
|00005830| 33 3a 0d 1e f0 12 c8 8e | 20 62 25 20 80 20 25 31 |3:......| b% . %1|
|00005840| 31 31 20 ca 0d 1e fa 08 | c9 20 34 3a 0d 1f 04 11 |11 .....|. 4:....|
|00005850| 4d 61 74 63 68 5f 74 61 | 67 25 2b 3d 31 0d 1f 0e |Match_ta|g%+=1...|
|00005860| 27 e7 20 4d 61 74 63 68 | 5f 74 61 67 25 3e 66 69 |'. Match|_tag%>fi|
|00005870| 65 6c 64 73 25 20 8c 20 | 4d 61 74 63 68 5f 74 61 |elds% . |Match_ta|
|00005880| 67 25 3d 31 0d 1f 18 08 | c9 20 31 3a 0d 1f 22 11 |g%=1....|. 1:..".|
|00005890| 4d 61 74 63 68 5f 74 61 | 67 25 2d 3d 31 0d 1f 2c |Match_ta|g%-=1..,|
|000058a0| 27 e7 20 4d 61 74 63 68 | 5f 74 61 67 25 3c 31 20 |'. Match|_tag%<1 |
|000058b0| 8c 20 4d 61 74 63 68 5f | 74 61 67 25 3d 66 69 65 |. Match_|tag%=fie|
|000058c0| 6c 64 73 25 0d 1f 36 05 | cb 0d 1f 40 26 24 a4 74 |lds%..6.|...@&$.t|
|000058d0| 65 78 74 28 6d 61 74 63 | 68 57 25 2c 33 29 3d 54 |ext(matc|hW%,3)=T|
|000058e0| 61 67 24 28 4d 61 74 63 | 68 5f 74 61 67 25 29 0d |ag$(Matc|h_tag%).|
|000058f0| 1f 4a 1b f2 72 65 64 72 | 61 77 5f 69 63 6f 6e 28 |.J..redr|aw_icon(|
|00005900| 6d 61 74 63 68 57 25 2c | 33 29 0d 1f 54 09 c9 20 |matchW%,|3)..T.. |
|00005910| 31 30 3a 0d 1f 5e 20 6f | 70 25 3d a4 73 65 6c 65 |10:..^ o|p%=.sele|
|00005920| 63 74 65 64 5f 65 73 67 | 28 6d 61 74 63 68 57 25 |cted_esg|(matchW%|
|00005930| 2c 31 29 0d 1f 68 0c c8 | 8e 20 6f 70 25 20 ca 0d |,1)..h..|. op% ..|
|00005940| 1f 72 0f c9 20 35 3a 6f | 70 24 3d 22 3d 22 0d 1f |.r.. 5:o|p$="="..|
|00005950| 7c 0f c9 20 36 3a 6f 70 | 24 3d 22 7b 22 0d 1f 86 ||.. 6:op|$="{"...|
|00005960| 0f c9 20 37 3a 6f 70 24 | 3d 22 3c 22 0d 1f 90 0f |.. 7:op$|="<"....|
|00005970| c9 20 38 3a 6f 70 24 3d | 22 3e 22 0d 1f 9a 11 c9 |. 8:op$=|">".....|
|00005980| 20 31 35 3a 6f 70 24 3d | 22 3c 3e 22 0d 1f a4 11 | 15:op$=|"<>"....|
|00005990| c9 20 31 38 3a 6f 70 24 | 3d 22 3e 3d 22 0d 1f ae |. 18:op$|=">="...|
|000059a0| 11 c9 20 31 39 3a 6f 70 | 24 3d 22 3c 3d 22 0d 1f |.. 19:op|$="<="..|
|000059b0| b8 11 c9 20 32 30 3a 6f | 70 24 3d 22 7d 7b 22 0d |... 20:o|p$="}{".|
|000059c0| 1f c2 05 cb 0d 1f cc 32 | 6e 6f 74 25 3d a4 73 65 |.......2|not%=.se|
|000059d0| 6c 65 63 74 65 64 28 6d | 61 74 63 68 57 25 2c 34 |lected(m|atchW%,4|
|000059e0| 29 3a f2 64 65 73 65 6c | 65 63 74 28 6d 61 74 63 |):.desel|ect(matc|
|000059f0| 68 57 25 2c 34 29 0d 1f | d6 34 61 6e 64 25 3d a4 |hW%,4)..|.4and%=.|
|00005a00| 73 65 6c 65 63 74 65 64 | 28 6d 61 74 63 68 57 25 |selected|(matchW%|
|00005a10| 2c 31 32 29 3a f2 64 65 | 73 65 6c 65 63 74 28 6d |,12):.de|select(m|
|00005a20| 61 74 63 68 57 25 2c 31 | 32 29 0d 1f e0 33 6f 72 |atchW%,1|2)...3or|
|00005a30| 25 3d a4 73 65 6c 65 63 | 74 65 64 28 6d 61 74 63 |%=.selec|ted(matc|
|00005a40| 68 57 25 2c 31 33 29 3a | f2 64 65 73 65 6c 65 63 |hW%,13):|.deselec|
|00005a50| 74 28 6d 61 74 63 68 57 | 25 2c 31 33 29 0d 1f ea |t(matchW|%,13)...|
|00005a60| 1a 74 61 67 24 3d 24 a4 | 74 65 78 74 28 6d 61 74 |.tag$=$.|text(mat|
|00005a70| 63 68 57 25 2c 33 29 0d | 1f f4 1f 63 6f 6e 74 65 |chW%,3).|...conte|
|00005a80| 6e 74 73 24 3d 24 a4 74 | 65 78 74 28 6d 61 74 63 |nts$=$.t|ext(matc|
|00005a90| 68 57 25 2c 39 29 0d 1f | fe 1b 6e 65 77 24 3d 74 |hW%,9)..|..new$=t|
|00005aa0| 61 67 24 2b 6f 70 24 2b | 63 6f 6e 74 65 6e 74 73 |ag$+op$+|contents|
|00005ab0| 24 0d 20 08 22 e7 20 6e | 6f 74 25 20 8c 20 6e 65 |$. .". n|ot% . ne|
|00005ac0| 77 24 3d 22 4e 4f 54 20 | 28 22 2b 6e 65 77 24 2b |w$="NOT |("+new$+|
|00005ad0| 22 29 22 0d 20 12 1a e7 | 20 61 6e 64 25 20 8c 20 |")". ...| and% . |
|00005ae0| 6e 65 77 24 2b 3d 22 20 | 41 4e 44 20 22 0d 20 1c |new$+=" |AND ". .|
|00005af0| 18 e7 20 6f 72 25 20 8c | 20 6e 65 77 24 2b 3d 22 |.. or% .| new$+="|
|00005b00| 20 4f 52 20 22 0d 20 26 | 2c 24 a4 74 65 78 74 28 | OR ". &|,$.text(|
|00005b10| 6d 61 74 63 68 57 25 2c | 30 29 3d 24 a4 74 65 78 |matchW%,|0)=$.tex|
|00005b20| 74 28 6d 61 74 63 68 57 | 25 2c 30 29 2b 6e 65 77 |t(matchW|%,0)+new|
|00005b30| 24 0d 20 30 16 c9 20 31 | 36 3a 63 61 73 65 25 3d |$. 0.. 1|6:case%=|
|00005b40| ac 20 63 61 73 65 25 0d | 20 3a 05 cb 0d 20 44 19 |. case%.| :... D.|
|00005b50| f2 73 65 74 5f 63 61 72 | 65 74 28 6d 61 74 63 68 |.set_car|et(match|
|00005b60| 57 25 2c 30 29 0d 20 4e | 1b f2 72 65 64 72 61 77 |W%,0). N|..redraw|
|00005b70| 5f 69 63 6f 6e 28 6d 61 | 74 63 68 57 25 2c 30 29 |_icon(ma|tchW%,0)|
|00005b80| 0d 20 58 05 e1 0d 20 62 | 05 3a 0d 20 6c 14 dd 20 |. X... b|.:. l.. |
|00005b90| f2 69 63 6f 6e 62 61 72 | 5f 63 6c 69 63 6b 0d 20 |.iconbar|_click. |
|00005ba0| 76 12 c8 8e 20 62 25 20 | 80 20 25 31 31 31 20 ca |v... b% |. %111 .|
|00005bb0| 0d 20 80 08 c9 20 32 3a | 0d 20 8a 1b f2 63 6c 6f |. ... 2:|. ...clo|
|00005bc0| 73 65 5f 77 69 6e 64 6f | 77 28 69 6e 66 6f 72 6d |se_windo|w(inform|
|00005bd0| 57 25 29 0d 20 94 24 f2 | 73 68 6f 77 5f 6d 65 6e |W%). .$.|show_men|
|00005be0| 75 28 6d 65 6e 75 25 28 | 30 29 2c 78 25 2d 36 34 |u(menu%(|0),x%-64|
|00005bf0| 2c 79 62 61 72 25 29 0d | 20 9e 08 c9 20 34 3a 0d |,ybar%).| ... 4:.|
|00005c00| 20 a8 10 e7 20 70 72 65 | 73 65 6e 74 25 20 8c 0d | ... pre|sent% ..|
|00005c10| 20 b2 11 f2 73 68 6f 77 | 5f 77 69 6e 64 6f 77 73 | ...show|_windows|
|00005c20| 0d 20 bc 05 cc 0d 20 c6 | 1a f2 6f 70 65 6e 5f 77 |. .... .|..open_w|
|00005c30| 69 6e 64 6f 77 28 69 6e | 66 6f 72 6d 57 25 29 0d |indow(in|formW%).|
|00005c40| 20 d0 05 cd 0d 20 da 05 | cb 0d 20 e4 05 e1 0d 20 | .... ..|.. .... |
|00005c50| ee 05 3a 0d 20 f8 11 dd | 20 f2 6d 61 69 6e 5f 63 |..:. ...| .main_c|
|00005c60| 6c 69 63 6b 0d 21 02 1e | ea 20 50 25 2c 46 25 2c |lick.!..|. P%,F%,|
|00005c70| 48 24 2c 4c 25 2c 54 25 | 2c 4e 24 2c 66 69 65 6c |H$,L%,T%|,N$,fiel|
|00005c80| 64 24 0d 21 0c 38 e7 20 | 70 72 65 73 65 6e 74 25 |d$.!.8. |present%|
|00005c90| 3d 37 20 8c 20 e7 20 a4 | 76 61 6c 69 64 61 74 65 |=7 . . .|validate|
|00005ca0| 28 46 69 65 6c 64 6e 75 | 6d 62 65 72 25 2c 54 25 |(Fieldnu|mber%,T%|
|00005cb0| 2c 4e 24 29 3d a3 20 8c | 20 e1 0d 21 16 11 c8 8e |,N$)=. .| ..!....|
|00005cc0| 20 70 72 65 73 65 6e 74 | 25 20 ca 0d 21 20 0c c9 | present|% ..! ..|
|00005cd0| 20 30 2c 31 2c 33 3a 0d | 21 2a 11 f2 64 65 73 69 | 0,1,3:.|!*..desi|
|00005ce0| 67 6e 5f 66 69 65 6c 64 | 0d 21 34 0a c9 20 35 2c |gn_field|.!4.. 5,|
|00005cf0| 37 3a 0d 21 3e 0f e7 20 | 61 64 6a 75 73 74 25 20 |7:.!>.. |adjust% |
|00005d00| 8c 0d 21 48 11 f2 64 65 | 73 69 67 6e 5f 66 69 65 |..!H..de|sign_fie|
|00005d10| 6c 64 0d 21 52 05 cc 0d | 21 5c 1f f2 69 64 65 6e |ld.!R...|!\..iden|
|00005d20| 74 69 66 79 5f 66 69 65 | 6c 64 28 6d 61 69 6e 57 |tify_fie|ld(mainW|
|00005d30| 25 2c 69 63 25 29 0d 21 | 66 1f e7 20 72 65 6c 61 |%,ic%).!|f.. rela|
|00005d40| 74 69 6f 6e 73 25 3d b9 | 20 8c 20 f2 72 65 6c 61 |tions%=.| . .rela|
|00005d50| 74 69 6f 6e 73 0d 21 70 | 12 c8 8e 20 62 25 20 80 |tions.!p|... b% .|
|00005d60| 20 25 31 31 31 20 ca 0d | 21 7a 08 c9 20 32 3a 0d | %111 ..|!z.. 2:.|
|00005d70| 21 84 16 e7 20 46 69 65 | 6c 64 6e 75 6d 62 65 72 |!... Fie|ldnumber|
|00005d80| 25 3d 30 20 8c 0d 21 8e | 16 f2 6c 69 74 28 6d 65 |%=0 ..!.|..lit(me|
|00005d90| 6e 75 25 28 31 29 2c 31 | 2c a3 29 0d 21 98 1a 24 |nu%(1),1|,.).!..$|
|00005da0| 46 69 65 6c 64 70 6f 73 | 25 3d 22 46 69 65 6c 64 |Fieldpos|%="Field|
|00005db0| 3a 20 27 27 22 0d 21 a2 | 05 cc 0d 21 ac 16 f2 6c |: ''".!.|...!...l|
|00005dc0| 69 74 28 6d 65 6e 75 25 | 28 31 29 2c 31 2c b9 29 |it(menu%|(1),1,.)|
|00005dd0| 0d 21 b6 2b 24 46 69 65 | 6c 64 70 6f 73 25 3d 22 |.!.+$Fie|ldpos%="|
|00005de0| 46 69 65 6c 64 3a 20 22 | 2b 54 61 67 24 28 46 69 |Field: "|+Tag$(Fi|
|00005df0| 65 6c 64 6e 75 6d 62 65 | 72 25 29 0d 21 c0 26 24 |eldnumbe|r%).!.&$|
|00005e00| 43 68 61 6e 67 65 54 69 | 74 6c 65 25 3d 22 46 69 |ChangeTi|tle%="Fi|
|00005e10| 65 6c 64 3a 20 22 2b 46 | 69 65 6c 64 6e 61 6d 65 |eld: "+F|ieldname|
|00005e20| 24 0d 21 ca 1a 24 4c 69 | 6e 6b 54 69 74 6c 65 25 |$.!..$Li|nkTitle%|
|00005e30| 3d 46 69 65 6c 64 6e 61 | 6d 65 24 0d 21 d4 25 24 |=Fieldna|me$.!.%$|
|00005e40| 43 61 6c 63 46 6f 72 6d | 25 3d 54 61 67 24 28 46 |CalcForm|%=Tag$(F|
|00005e50| 69 65 6c 64 6e 75 6d 62 | 65 72 25 29 2b 22 3d 22 |ieldnumb|er%)+"="|
|00005e60| 0d 21 de 53 e7 20 4d 6f | 64 69 66 79 25 20 8c 20 |.!.S. Mo|dify% . |
|00005e70| f2 6c 69 74 28 6d 65 6e | 75 25 28 31 30 29 2c 33 |.lit(men|u%(10),3|
|00005e80| 2c 28 63 68 61 72 74 79 | 70 65 25 28 46 69 65 6c |,(charty|pe%(Fiel|
|00005e90| 64 6e 75 6d 62 65 72 25 | 29 3d 36 29 29 20 8b 20 |dnumber%|)=6)) . |
|00005ea0| f2 6c 69 74 28 6d 65 6e | 75 25 28 31 30 29 2c 33 |.lit(men|u%(10),3|
|00005eb0| 2c a3 29 0d 21 e8 05 cd | 0d 21 f2 24 f2 73 68 6f |,.).!...|.!.$.sho|
|00005ec0| 77 5f 6d 65 6e 75 28 6d | 65 6e 75 25 28 31 29 2c |w_menu(m|enu%(1),|
|00005ed0| 78 25 2d 36 34 2c 79 25 | 2d 32 30 29 0d 21 fc 08 |x%-64,y%|-20).!..|
|00005ee0| c9 20 31 3a 0d 22 06 0e | e7 20 69 63 25 3e 3d 30 |. 1:."..|. ic%>=0|
|00005ef0| 20 8c 0d 22 10 14 f2 69 | 6e 76 65 72 74 28 77 69 | .."...i|nvert(wi|
|00005f00| 25 2c 69 63 25 29 0d 22 | 1a 3f 66 69 65 6c 64 24 |%,ic%)."|.?field$|
|00005f10| 3d c3 7e 46 69 65 6c 64 | 6e 75 6d 62 65 72 25 3a |=.~Field|number%:|
|00005f20| e7 20 46 69 65 6c 64 6e | 75 6d 62 65 72 25 3c 31 |. Fieldn|umber%<1|
|00005f30| 36 20 8c 20 66 69 65 6c | 64 24 3d 22 30 22 2b 66 |6 . fiel|d$="0"+f|
|00005f40| 69 65 6c 64 24 0d 22 24 | 1a e7 20 a4 73 65 6c 65 |ield$."$|.. .sele|
|00005f50| 63 74 65 64 28 77 69 25 | 2c 69 63 25 29 20 8c 0d |cted(wi%|,ic%) ..|
|00005f60| 22 2e 17 70 72 69 6e 74 | 6f 72 64 65 72 24 2b 3d |"..print|order$+=|
|00005f70| 66 69 65 6c 64 24 0d 22 | 38 28 f2 65 6e 61 62 6c |field$."|8(.enabl|
|00005f80| 65 5f 72 6f 77 28 63 61 | 6c 63 72 6f 77 25 3f 46 |e_row(ca|lcrow%?F|
|00005f90| 69 65 6c 64 6e 75 6d 62 | 65 72 25 2c b9 29 0d 22 |ieldnumb|er%,.)."|
|00005fa0| 42 16 f2 6c 69 74 28 6d | 65 6e 75 25 28 36 29 2c |B..lit(m|enu%(6),|
|00005fb0| 37 2c b9 29 0d 22 4c 16 | f2 6c 69 74 28 6d 65 6e |7,.)."L.|.lit(men|
|00005fc0| 75 25 28 36 29 2c 38 2c | b9 29 0d 22 56 05 cc 0d |u%(6),8,|.)."V...|
|00005fd0| 22 60 05 f5 0d 22 6a 20 | 50 25 3d a7 70 72 69 6e |"`..."j |P%=.prin|
|00005fe0| 74 6f 72 64 65 72 24 2c | 66 69 65 6c 64 24 2c 50 |torder$,|field$,P|
|00005ff0| 25 2b 31 29 0d 22 74 1b | fd 20 50 25 3e 30 20 80 |%+1)."t.|. P%>0 .|
|00006000| 20 28 28 50 25 2d 31 29 | 20 83 20 32 29 3d 30 0d | ((P%-1)| . 2)=0.|
|00006010| 22 7e 35 70 72 69 6e 74 | 6f 72 64 65 72 24 3d c0 |"~5print|order$=.|
|00006020| 70 72 69 6e 74 6f 72 64 | 65 72 24 2c 50 25 2d 31 |printord|er$,P%-1|
|00006030| 29 2b c1 70 72 69 6e 74 | 6f 72 64 65 72 24 2c 50 |)+.print|order$,P|
|00006040| 25 2b 32 29 0d 22 88 28 | f2 65 6e 61 62 6c 65 5f |%+2).".(|.enable_|
|00006050| 72 6f 77 28 63 61 6c 63 | 72 6f 77 25 3f 46 69 65 |row(calc|row%?Fie|
|00006060| 6c 64 6e 75 6d 62 65 72 | 25 2c a3 29 0d 22 92 16 |ldnumber|%,.)."..|
|00006070| e7 20 70 72 69 6e 74 6f | 72 64 65 72 24 3d 22 22 |. printo|rder$=""|
|00006080| 20 8c 0d 22 9c 16 f2 6c | 69 74 28 6d 65 6e 75 25 | .."...l|it(menu%|
|00006090| 28 36 29 2c 37 2c a3 29 | 0d 22 a6 16 f2 6c 69 74 |(6),7,.)|."...lit|
|000060a0| 28 6d 65 6e 75 25 28 36 | 29 2c 38 2c a3 29 0d 22 |(menu%(6|),8,.)."|
|000060b0| b0 05 cd 0d 22 ba 05 cd | 0d 22 c4 05 cd 0d 22 ce |...."...|."....".|
|000060c0| 08 c9 20 34 3a 0d 22 d8 | 33 e7 20 46 69 65 6c 64 |.. 4:.".|3. Field|
|000060d0| 6e 75 6d 62 65 72 25 3e | 30 20 80 20 63 68 61 72 |number%>|0 . char|
|000060e0| 74 79 70 65 25 28 46 69 | 65 6c 64 6e 75 6d 62 65 |type%(Fi|eldnumbe|
|000060f0| 72 25 29 3c 3e 36 20 8c | 0d 22 e2 33 21 62 6c 6f |r%)<>6 .|.".3!blo|
|00006100| 63 6b 25 3d 6d 61 69 6e | 57 25 3a c8 99 20 22 57 |ck%=main|W%:.. "W|
|00006110| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 53 74 61 |imp_GetW|indowSta|
|00006120| 74 65 22 2c 2c 62 6c 6f | 63 6b 25 0d 22 ec 54 e7 |te",,blo|ck%.".T.|
|00006130| 20 41 63 63 65 73 73 25 | 20 8c 20 c8 99 20 22 57 | Access%| . .. "W|
|00006140| 69 6d 70 5f 53 65 74 43 | 61 72 65 74 50 6f 73 69 |imp_SetC|aretPosi|
|00006150| 74 69 6f 6e 22 2c 6d 61 | 69 6e 57 25 2c 69 63 25 |tion",ma|inW%,ic%|
|00006160| 2c 78 25 2d 62 6c 6f 63 | 6b 25 21 34 2b 62 6c 6f |,x%-bloc|k%!4+blo|
|00006170| 63 6b 25 21 32 30 2c 79 | 25 2c 2d 31 2c 2d 31 0d |ck%!20,y|%,-1,-1.|
|00006180| 22 f6 05 cd 0d 23 00 1f | e7 20 6d 61 74 63 68 69 |"....#..|. matchi|
|00006190| 6e 67 25 20 80 20 ac 20 | 70 72 69 6e 74 69 6e 67 |ng% . . |printing|
|000061a0| 25 20 8c 0d 23 0a 29 24 | a4 74 65 78 74 28 6d 61 |% ..#.)$|.text(ma|
|000061b0| 74 63 68 57 25 2c 30 29 | 2b 3d 54 61 67 24 28 46 |tchW%,0)|+=Tag$(F|
|000061c0| 69 65 6c 64 6e 75 6d 62 | 65 72 25 29 0d 23 14 19 |ieldnumb|er%).#..|
|000061d0| f2 73 65 74 5f 63 61 72 | 65 74 28 6d 61 74 63 68 |.set_car|et(match|
|000061e0| 57 25 2c 30 29 0d 23 1e | 1b f2 72 65 64 72 61 77 |W%,0).#.|..redraw|
|000061f0| 5f 69 63 6f 6e 28 6d 61 | 74 63 68 57 25 2c 30 29 |_icon(ma|tchW%,0)|
|00006200| 0d 23 28 05 cd 0d 23 32 | 21 e7 20 63 61 6c 63 6c |.#(...#2|!. calcl|
|00006210| 69 6e 6b 25 3e 30 20 80 | 20 ac 20 70 72 69 6e 74 |ink%>0 .| . print|
|00006220| 69 6e 67 25 20 8c 0d 23 | 3c 28 24 a4 74 65 78 74 |ing% ..#|<($.text|
|00006230| 28 63 61 6c 63 57 25 2c | 30 29 2b 3d 54 61 67 24 |(calcW%,|0)+=Tag$|
|00006240| 28 46 69 65 6c 64 6e 75 | 6d 62 65 72 25 29 0d 23 |(Fieldnu|mber%).#|
|00006250| 46 18 f2 73 65 74 5f 63 | 61 72 65 74 28 63 61 6c |F..set_c|aret(cal|
|00006260| 63 57 25 2c 30 29 0d 23 | 50 1a f2 72 65 64 72 61 |cW%,0).#|P..redra|
|00006270| 77 5f 69 63 6f 6e 28 63 | 61 6c 63 57 25 2c 30 29 |w_icon(c|alcW%,0)|
|00006280| 0d 23 5a 05 cd 0d 23 64 | 05 cb 0d 23 6e 05 cd 0d |.#Z...#d|...#n...|
|00006290| 23 78 05 cb 0d 23 82 05 | e1 0d 23 8c 05 3a 0d 23 |#x...#..|..#..:.#|
|000062a0| 96 12 dd 20 f2 70 72 69 | 6e 74 5f 63 6c 69 63 6b |... .pri|nt_click|
|000062b0| 0d 23 a0 14 c8 8e 20 28 | 62 25 20 80 20 25 31 31 |.#.... (|b% . %11|
|000062c0| 31 29 20 ca 0d 23 aa 43 | c9 20 32 3a e7 20 a4 73 |1) ..#.C|. 2:. .s|
|000062d0| 65 6c 65 63 74 65 64 28 | 70 72 69 6e 74 57 25 2c |elected(|printW%,|
|000062e0| 32 36 29 20 8c 20 f2 73 | 68 6f 77 5f 6d 65 6e 75 |26) . .s|how_menu|
|000062f0| 28 6c 61 62 65 6c 57 25 | 2c 78 25 2d 35 30 30 2c |(labelW%|,x%-500,|
|00006300| 79 25 2b 32 30 30 29 0d | 23 b4 0a c9 20 31 2c 34 |y%+200).|#... 1,4|
|00006310| 3a 0d 23 be 0c c8 8e 20 | 69 63 25 20 ca 0d 23 c8 |:.#.... |ic% ..#.|
|00006320| 3d c9 20 32 33 2c 32 34 | 2c 32 35 3a f2 69 63 6f |=. 23,24|,25:.ico|
|00006330| 6e 5f 62 69 74 28 32 32 | 2c 70 72 69 6e 74 57 25 |n_bit(22|,printW%|
|00006340| 2c 31 35 2c a4 73 65 6c | 65 63 74 65 64 28 70 72 |,15,.sel|ected(pr|
|00006350| 69 6e 74 57 25 2c 32 35 | 29 29 0d 23 d2 09 c9 20 |intW%,25|)).#... |
|00006360| 32 36 3a 0d 23 dc 32 f2 | 69 63 6f 6e 5f 62 69 74 |26:.#.2.|icon_bit|
|00006370| 28 32 32 2c 70 72 69 6e | 74 57 25 2c 31 35 2c a4 |(22,prin|tW%,15,.|
|00006380| 73 65 6c 65 63 74 65 64 | 28 70 72 69 6e 74 57 25 |selected|(printW%|
|00006390| 2c 32 35 29 29 0d 23 e6 | 25 f2 73 68 6f 77 5f 6d |,25)).#.|%.show_m|
|000063a0| 65 6e 75 28 6c 61 62 65 | 6c 57 25 2c 78 25 2d 35 |enu(labe|lW%,x%-5|
|000063b0| 30 30 2c 79 25 2b 32 30 | 30 29 0d 23 f0 2f c9 20 |00,y%+20|0).#./. |
|000063c0| 32 38 3a f2 64 72 61 67 | 5f 6f 70 74 69 6f 6e 73 |28:.drag|_options|
|000063d0| 28 24 64 61 74 61 62 61 | 73 65 25 2b 22 2e 50 72 |($databa|se%+".Pr|
|000063e0| 69 6e 74 4f 70 74 73 22 | 29 0d 23 fa 21 c9 20 32 |intOpts"|).#.!. 2|
|000063f0| 30 3a c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |0:.. "Wi|mp_Creat|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
